谷歌金山词霸合作版 自动安装

huangguolian

Run(@ScriptDir&"xdictG.exe")

WinWait("谷歌金山词霸合作版 安装","谷歌金山词霸合作版")     ;关键点 标题文字必须完全一致
WinWaitActive("谷歌金山词霸合作版 安装","谷歌金山词霸合作版")
Send("!n")

WinWait("谷歌金山词霸合作版 安装","许可证协议")
WinWaitActive("谷歌金山词霸合作版 安装","许可证协议")
ControlCommand("谷歌金山词霸合作版 安装","许可证协议", "Button4", "Check")     ;打上钩 我接受许可证协议中的条款
Send("!n")

WinWait("谷歌金山词霸合作版 安装","选择安装位置")
WinWaitActive("谷歌金山词霸合作版 安装","选择安装位置")
Send("C:Program FilesKingsoftPowerWord Lite")
Send("!i")

WinWait("谷歌金山词霸合作版 安装","正在安装")
WinWaitActive("谷歌金山词霸合作版 安装","正在安装")
Send("!n")

WinWait("谷歌金山词霸合作版 安装","安装完成")
WinWaitActive("谷歌金山词霸合作版 安装","安装完成")
ControlCommand("谷歌金山词霸合作版 安装","安装完成", "Button7", "UnCheck")     ;去掉 将www.iciba.com爱词霸英语学习社区放入收藏夹 钩
Send("!n")

WinWait("谷歌金山词霸合作版 安装","正在完成“谷歌金山词霸合作版”安装向导")
WinWaitActive("谷歌金山词霸合作版 安装","正在完成“谷歌金山词霸合作版”安装向导")
ControlCommand("谷歌金山词霸合作版 安装","正在完成“谷歌金山词霸合作版”安装向导", "Button4", "UnCheck")     ;去掉 运行谷歌金山词霸合作版 钩
ControlCommand("谷歌金山词霸合作版 安装","正在完成“谷歌金山词霸合作版”安装向导", "Button5", "UnCheck")     ;去掉 打开快速入门（需联网） 钩
Send("!f")
Send("{enter}")

xrbenbeba

很正常的代码啊

robin.von

代码质量不高！