应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") `控件点击