使用精易模块!
代码:
.版本 2
.支持库 shell
.支持库 eAPI
路径 = 取特定目录 (11) + “\realVNC6.0.exe ”
写到文件 (路径, #VNC)
.如果 (静默安装.选中)
程序_运行Ex (路径, , , , , , )
程序_延时 (5000, )
.判断循环首 (一级句柄 ≤ 0)
一级句柄 = 窗口_取句柄 (, , , “VNC?Setup”)
.判断循环尾 ()
窗口_总在最前 (一级句柄, 真)
窗口_置位置和大小 (一级句柄, 0, 0, , )
投递消息整数 (一级句柄, 256, #回车键, 0)
程序_延时 (200, )
模拟鼠标点击 (43, 294, #接口常量.左键单击)
程序_延时 (200, )
投递消息整数 (一级句柄, 256, #回车键, 0)
模拟鼠标点击 (58, 213, #接口常量.左键单击)
程序_延时 (200, )
投递消息整数 (一级句柄, 256, #回车键, 0)
程序_延时 (200, )
投递消息整数 (一级句柄, 256, #回车键, 0)
程序_延时 (200, )
投递消息整数 (一级句柄, 256, #回车键, 0)
程序_延时 (200, )
投递消息整数 (一级句柄, 256, #回车键, 0)
程序_延时 (5000, )
.判断循环首 (一级句柄 > 0)
程序_延时 (500, )
投递消息整数 (一级句柄, 256, #回车键, 0)
一级句柄 = 窗口_取句柄 (, , , “VNC?Setup”)
.判断循环尾 ()
.否则
程序_运行Ex (路径, 真, , , , , )
.如果结束
程序_延时 (500, )
删除文件 (取特定目录 (11) + “\realVNC6.0.exe ”)
解释,通关向窗口投递消息实现控制该窗口执行一系列操作!具体原理请自行理解,就不一一解释.
|