应Cfan论坛精品软件下载版块版主清水飞云兄要求编写的AU3源码,完成千千静听的自动安装,写的很一般很一般……

$PT="千千静听 5.7正式版 安装程序 Unicode" `定义字符串变量
$PR="欢迎使用 千千静听 5.7正式版 安装程序"
$PW="完成 千千静听 5.7正式版 安装向导"
Run("TTpsetup.exe") `运行TTpsetup.exe
WinWaitActive($PT,$PR) `等待安装程序窗口出现,程序窗口特征(包含千千静听 5.7正式版 安装程序 Unicode和欢迎使用 千千静听 5.7正式版 安装程序)
traytip(" 温馨提示","自动安装期间为避免操作失败,请勿动键盘鼠标",15,4) `显示提示窗口(不知道为何在我这里看不到)
Send("!s") `发送Alt+s
Send("!a") `发送Alt+a
Send("!n") `发送Alt+n
Send("!n") `发送alt+n
ControlCommand($PT,"", "Button2", "Check", "") `出现标题为千千静听 5.7正式版 安装程序 Unicode的窗口时,将第二个控件的勾点上
ControlCommand($PT,"", "Button7", "UnCheck", "") `部分同上,取消百度工具栏的勾
WinWaitActive($PT,$PW) `等待出现以完成 千千静听 5.7正式版 安装向导为内容的窗口
ControlCommand($PT,"", "Button1", "UnCheck", "") `取消控件上的勾
ControlCommand($PT,"", "Button2", "UnCheck", "")
ControlCommand($PT,"", "Button3", "UnCheck", "")
ControlCommand($PT,"", "Button4", "UnCheck", "")
ControlClick ($PT,"","Button17") `控件点击

版权声明
转载保留版权: 大D技研室 | 《应清水飞云兄要求编写的AU3源码》
本文链接地址:https://www.dadclab.com/archives/56.jiecao
转载须知:如果您需要转载本文,请将版权信息,版权授权方式,以及本文的链接地址注明,谢谢合作。
本文被贴上了: 标签