易语言IP安全策略自动设置源码 [db:版本]

IP安全策略自动设置

系统结构:加载Vista皮肤,写出特定数据,启动控制台,进入运行目录,开启取回,控制台_连接,控制台_发送命令,控制台_取回结果,控制台_断开连接,关闭句柄_,读管道,取系统目录,SkinH_Attach_Res_,SkinH_Aero_,SkinH_Aero_Ajust_,SkinH_Alpha_Menu_,SkinH_Alpha_,SetLayeredWindowAttributes_,创建匿名管道,创建进程,读文件,写文件,关闭句柄,获取进程状态,获取启动信息_,结束进程,打开进程句柄,取系统目录_,

======窗口程序集1

| |

| |------ __启动窗口_创建完毕

| |

| |------ 加载Vista皮肤

| |

| |------ 写出特定数据

| |

| |------ 启动控制台

| |

| |------ 进入运行目录

| |

| |------ 开启取回

| |

| |------ __启动窗口_可否被关闭

| |

| |------ _按钮5_被单击

| |

| |------ _按钮6_被单击

| |

| |------ _按钮7_被单击

| |

| |

======程序集_管道

| |

| |------ _启动子程序

| |

| |------ _临时子程序

| |

| |------ 控制台_连接

| |

| |------ 控制台_发送命令

| |

| |------ 控制台_取回结果

| |

| |------ 控制台_断开连接

| |

| |------ 关闭句柄_

| |

| |------ 读管道

| |

| |------ 取系统目录

| |

| |

======调用的Dll

| |

| |---[dll]------ SkinH_Attach_Res_

| |

| |---[dll]------ SkinH_Aero_

| |

| |---[dll]------ SkinH_Aero_Ajust_

| |

| |---[dll]------ SkinH_Alpha_Menu_

| |

| |---[dll]------ SkinH_Alpha_

| |

| |---[dll]------ SetLayeredWindowAttributes_

| |

| |---[dll]------ 创建匿名管道

| |

| |---[dll]------ 创建进程

| |

| |---[dll]------ 读文件

| |

| |---[dll]------ 写文件

| |

| |---[dll]------ 关闭句柄

| |

| |---[dll]------ 获取进程状态

| |

| |---[dll]------ 获取启动信息_

| |

| |---[dll]------ 结束进程

| |

| |---[dll]------ 打开进程句柄

| |

| |---[dll]------ 取系统目录_

调用的DLL命令:

.DLL命令 SkinH_Attach_Res_, 整数型, "SkinH.dll", "SkinH_Attach_Res", , 从资源添加皮肤，并指定皮肤的色调，饱和度，亮度，成功返回0

.参数 资源皮肤, 字节集, , 皮肤数据

.参数 资源大小, 整数型, , 皮肤数据大小

.参数 皮肤密码, 文本型, , 皮肤密钥

.参数 色调, 整数型, , 取值范围 1-360

.参数 饱和度, 整数型, , 取值范围 1-256

.参数 亮度, 整数型, , 取值范围 1-256

.DLL命令 SkinH_Aero_, , "SkinH.dll", "SkinH_Aero", , 设置Vista特效

.参数 hWnd, 整数型, , 窗口句柄

.DLL命令 SkinH_Aero_Ajust_, , "SkinH.dll", "SkinH_Aero_Ajust", , 设置Vista特效的阴影大小。成功返回0，失败返回非0

.参数 透明度, 整数型, , 1－255 默认值0

.参数 亮度, 整数型, , 1－255 默认值0

.参数 锐度, 整数型, , 1－255 默认值0

.参数 阴影大小, 整数型, , 2－19 默认值0

.参数 水平偏移, 整数型, , 默认值0

.参数 垂直偏移, 整数型, , 默认值0

.参数 红色分量, 整数型, , 0－255 默认值 -1

.参数 绿色分量, 整数型, , 0－255 默认值 -1

.参数 蓝色分量, 整数型, , 0－255 默认值 -1

.DLL命令 SkinH_Alpha_Menu_, 整数型, "SkinH.dll", "SkinH_Alpha_Menu", , 设置菜单的透明度，成功返回0

.参数 透明度, 整数型, , 取值范围 0-255

.DLL命令 SkinH_Alpha_, 整数型, "SkinH.dll", "SkinH_Alpha", , 设置指定句柄的窗体的透明度，成功返回0

.参数 句柄, 整数型, , 指定窗体句柄

.参数 透明度, 整数型, , 取值范围 0-255

.DLL命令 SetLayeredWindowAttributes_, 整数型, , "SetLayeredWindowAttributes", , 设置窗口透明

.参数 hwnd, 整数型

.参数 crKey, 整数型

.参数 bAlpha, 整数型

.参数 dwFlags, 整数型

.DLL命令 创建匿名管道, 整数型, , "CreatePipe"

.参数 输出管道, 整数型, 传址

.参数 输入管道, 整数型, 传址

.参数 管道属性, 安全属性, 传址

.参数 尺寸, 整数型

.DLL命令 创建进程, 整数型, , "CreateProcessA"

.参数 程序名称, 整数型, , 32位程序用，可设为文本型

.参数 命令行, 文本型

.参数 进程属性, 整数型

.参数 线程属性, 整数型

.参数 参数一, 整数型

.参数 参数二, 整数型

.参数 参数三, 整数型

.参数 运行目录, 文本型, , 如需指定运行目录设为文本行

.参数 启动信息, 启动信息

.参数 进程信息, 进程信息

.DLL命令 读文件, 整数型, , "ReadFile"

.参数 文件号, 整数型

.参数 缓存, 字节集, 传址

.参数 读取尺寸, 整数型

.参数 实际尺寸, 整数型, 传址

.参数 参数, 整数型

.DLL命令 写文件, 整数型, , "WriteFile"

.参数 文件号, 整数型

.参数 写入内容, 字节集, 传址

.参数 写入尺寸, 整数型

.参数 实际尺寸, 整数型, 传址

.参数 参数, 整数型

.DLL命令 关闭句柄, 整数型, , "CloseHandle"

.参数 句柄, 整数型

.DLL命令 获取进程状态, 整数型, , "GetExitCodeProcess"

.参数 进程号, 整数型

.参数 进程状态, 整数型, 传址

.DLL命令 获取启动信息_, 整数型, "kernel32", "GetStartupInfoA"

.参数 启动信息, 启动信息, 传址

.DLL命令 结束进程, 逻辑型, , "TerminateProcess"

.参数 指定进程, 整数型

.参数 退出标记, 整数型

.DLL命令 打开进程句柄, 整数型, , "OpenProcess"

.参数 访问方法, 整数型

.参数 子程序继承, 逻辑型, , 是否由子程序继承

.参数 进程标识符, 整数型

.DLL命令 取系统目录_, 整数型, "kernel32", "GetSystemDirectoryA"

.参数 缓冲区, 文本型

.参数 缓冲区长度, 整数型