分类:
2010-11-29 13:53:26
在自动安装软件的时候,我用的是send()函数,send下一步的指令,但是这个是没谱的事,如果窗口不是active的就失效了,今天发现了一个新的方法用control来控制,鼠标的话就用controlclick()来模拟
BlockInput(1)
run("powerwordlite.25269.3008.exe")
WinWaitActive("谷歌金山词霸合作版 安装","下一步")
;WinActivate("[class:#32770]","")
Controlclick("谷歌金山词霸合作版 安装","下一步","[CLASS:Button; INSTANCE:2]","")
WinWaitActive("谷歌金山词霸合作版 安装","许可证协议")
;WinActivate("[class:#32770]","")
Controlclick("谷歌金山词霸合作版 安装","许可证协议","[CLASS:Button; INSTANCE:4]","")
ControlClick("谷歌金山词霸合作版 安装","许可证协议","[CLASS:Button; INSTANCE:2]","")
WinWaitActive("谷歌金山词霸合作版 安装 ","选择安装位置")
;WinActivate("[class:#32770]","")
ControlClick("谷歌金山词霸合作版 安装","选择安装位置","[CLASS:Button; INSTANCE:2]","")
WinWaitActive("谷歌金山词霸合作版 安装","安装完成")
;WinActivate("[class:#32770]","")
;ControlClick("谷歌金山词霸合作版 安装","创建桌面快捷方式",1200,"[CLASS:Button; INSTANCE:4]")
ControlClick("谷歌金山词霸合作版 安装","创建开始菜单快捷方式","[CLASS:Button; INSTANCE:5]","")
ControlClick("谷歌金山词霸合作版 安装","爱词霸英语学习社区放入收藏夹","[CLASS:Button; INSTANCE:7]","")
ControlClick("谷歌金山词霸合作版 安装","下一步","[CLASS:Button; INSTANCE:2]","")
WinWaitActive("谷歌金山词霸合作版 安装","聪明的Google谷歌拼音输入法")
;WinActivate("[class:#32770]","")
ControlClick("谷歌金山词霸合作版 安装","不安装谷歌拼音输入法","[CLASS:Button; INSTANCE:8]","")
ControlClick("谷歌金山词霸合作版 安装","下一步","[CLASS:Button; INSTANCE:2]","")
WinWaitActive("谷歌金山词霸合作版 安装","正在完成“谷歌金山词霸合作版”安装向导")
;WinActivate("[class:#32770]","")
ControlClick("谷歌金山词霸合作版 安装","运行 谷歌金山词霸合作版","[CLASS:Button; INSTANCE:4]","")
ControlClick("谷歌金山词霸合作版 安装","打开“快速入门”(需联网)","[CLASS:Button; INSTANCE:5]","")
ControlClick("谷歌金山词霸合作版 安装","完成","[CLASS:Button; INSTANCE:2]","")
BlockInput(0)
这里面用了blockinput()来禁止用户操作,防止用户点别的窗口造成安装窗口失效,其实那些[CLASS:Button; INSTANCE:2]可以直接用Button2来代替,不用那么麻烦了
chinaunix网友2010-11-30 10:50:09
很好的, 收藏了 推荐一个博客,提供很多免费软件编程电子书下载: http://free-ebooks.appspot.com