|
刚学,谢了种QQ2013的安装脚本,大家帮忙看下哪个好些,错误率会低些!能指出缺陷的最好了!
还有问下,为什么用send发送中文会乱码??
1.
#RequireAdmin
Local $xy="QQ软件许可及服务协议"
Local $tx="腾讯QQ2013 安装向导"
Local $zd="自定义安装选项"
Local $ml="程序安装目录"
Local $wc="安装完成"
Run(@ScriptDir & "\QQ2013Beta2_1.90.8051.0.exe")
WinWaitActive($tx,$xy)
ControlClick($tx,$xy,"Button1")
ControlClick($tx,$xy,"Button2")
WinWaitActive($tx,$zd)
ControlClick($tx,$zd,"Button1")
ControlClick($tx,$zd,"Button2")
ControlClick($tx,$zd,"Button4")
ControlClick($tx,$zd,"Button7")
WinWaitActive($tx,$ml)
Send("{tab}d:\Program Files\Tencent\QQ")
ControlClick($tx,$ml,"Button6")
WinWaitActive($tx,$wc)
ControlClick($tx,$wc,"Button1")
ControlClick($tx,$wc,"Button2")
ControlClick($tx,$wc,"Button3")
ControlClick($tx,$wc,"Button4")
ControlClick($tx,$wc,"Button7")
2.
#RequireAdmin
Run(@ScriptDir & "\QQ2013Beta2_1.90.8051.0.exe")
WinWaitActive("腾讯QQ2013 安装向导","QQ软件许可及服务协议")
Send("{tab}{tab}{tab}{space}!n")
WinWaitActive("腾讯QQ2013 安装向导","自定义安装选项")
Send("{tab}{space}{tab}{space}{tab}{space}!n")
WinWaitActive("腾讯QQ2013 安装向导","程序安装目录")
Send("{tab}d:\Program Files\Tencent\QQ")
Send("!i")
WinWaitActive("腾讯QQ2013 安装向导","安装完成")
Send("{tab}{space}{tab}{space}{tab}{space}{tab}{space}!f") |
|