QQ2011官方正式版全自动安装脚本
本帖最后由 yangsheng1119 于 2012-2-13 08:57 编辑#RequireAdmin
Opt("TrayAutoPause",0)
Opt("MouseCoordMode",0)
BlockInput(1)
Run(@ScriptDir & "\QQ2011.exe")
$title="腾讯QQ2011 安装向导"
SendKeepActive($title,"")
$text1="我已阅读并同意软件许可协议和青少年上网安全指引"
WinWaitActive($title,$text1)
WinActive($title,$text1)
ControlCommand($title,$text1,"","check")
Sleep(100)
ControlClick($title,$text1,"")
$text2="请选择自定义安装选项与快捷方式选项"
WinWaitActive($title,$text2)
WinActive($title,$text2)
Controlclick($title,$text2,"")
Sleep(100)
ControlEnable($title,$text2,"")
ControlClick($title,$text2,"")
Sleep(100)
ControlEnable($title,$text2,"")
controlshow($title,$text2,"")
ControlClick($title,$text2,"")
Sleep(100)
ControlEnable($title,$text2,"")
controlshow($title,$text2,"")
ControlClick($title,$text2,"")
Sleep(100)
ControlEnable($title,$text2,"")
controlshow($title,$text2,"")
ControlClick($title,$text2,"")
Sleep(100)
Controlshow($title,$text2,"")
ControlClick($title,$text2,"")
Sleep(100)
ControlClick($title,$text2,"")
Sleep(100)
Controlshow($title,$text2,"")
Controlclick($title,$text2,"")
ControlHide($title,$text2,"")
Sleep(100)
ControlClick($title,$text2,"")
Sleep(100)
ControlClick($title,$text2,"")
$text3="请选择安装路径"
WinWaitActive($title,$text3)
WinActive($title,$text3)
ControlClick($title,$text3,"")
$text4="安装完成"
WinWaitActive($title,$text4)
WinActive($title,$text4)
Sleep(1000)
Controlclick($title,$text4,"")
Sleep(1000)
Controlclick($title,$text4,"")
Sleep(1000)
Controlclick($title,$text4,"")
Sleep(1000)
Controlclick($title,$text4,"")
Sleep(1000)
Controlclick($title,$text4,"")
FileDelete(@DesktopDir & "\WebQQ.url")
BlockInput(0) 脚本么,看都要钱
论坛在这样发展就么人了! 试一试 谢谢分享 流水线型作业,没技术含量 本来是为了做定制系统看看AUTOit,现在看来要好好学了 看不懂,自己不会,学习学习了 可以作为学习的参考 感觉思路不错 可以学习 学习 太长了吧!不错 楼主要是能加上汉字的注释我敢保证访问量倍增呀
页:
[1]