易语言通过投递消息操作另一程序窗口实现程序静默安装

Unknown无名 · 发表于 2020-2-13 01:41:08

使用精易模块！

代码：

.版本 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 ”)

解释，通关向窗口投递消息实现控制该窗口执行一系列操作！具体原理请自行理解，就不一一解释.

airaz · 发表于 2021-3-28 12:32:12

ゾ堕天メ小戀发表于 2020-4-16 17:16
用au3编脚本，再用易语言调用，更简单些！

兄弟来个源码看看学习谢谢

fengyf5072 · 发表于 2020-7-24 11:13:15

支持开源~！感谢分享

ゾ堕天メ小戀 · 发表于 2020-4-16 17:16:07

用au3编脚本，再用易语言调用，更简单些！

ゾ堕天メ小戀 · 发表于 2020-4-16 17:13:51

这样不科学，电脑有配置差异。

wjnm · 发表于 2020-3-25 11:07:26

一种新的坑害方法

王者路太艰难 · 发表于 2020-3-4 09:35:28

延迟判断无法实现精准静默需条件循环等方式。每台机器情况都不一样。不是唯一标准

myxf · 发表于 2020-3-1 22:19:12

谢谢分享，收藏

838150893 · 发表于 2020-2-25 09:51:01

感谢楼主无私分享源码

齐小小 · 发表于 2020-2-23 13:03:25

撒大大大大大

镇魂 · 发表于 2020-2-23 10:17:04

你这分享的，啧啧把这方法一公布岂不又多了坑害着

		自动登录	找回密码
密码			注册

[易源码分享] 易语言通过投递消息操作另一程序窗口实现程序静默安装

点评

评分