;本脚本由i-Autoit-1.01 正式版 生成 ,非常感谢您的使用,请保留此脚本声明! 2011年04月22日
;--------------------------------------------------------------;脚本开始
Opt("TrayIconDebug", 1) ;0=无信息, 1=调试信息
Opt("WinTextMatchMode", 1) ;1=完全匹配, 2=快速匹配
Opt("WinTitleMatchMode", 1) ;1=开头, 2=子串, 3=完全, 4=高级
Opt("WinSearchChildren", 1) ;0=不搜索, 1=搜索子窗口
Opt("WinDetectHiddenText", 1) ;0=不检测, 1=检测
;--------------------------------------------------------------;设置脚本参数
TrayTip ( "温馨提示", "正在自动安装请不要动鼠标键盘"&@CRLF&"反馈http://www.joz7.com",5,4)
;--------------------------------------------------------------;右下角气泡提示
$WinTitle_1= '腾讯QQ2011 安装向导'
;$WinTitle_2= 'QQ电脑管家在线安装'
$Wintxt_1= '我已阅读并同意软件许可协议和青少年上网安全指引'
$Wintxt_2= '下一步(&N)'
$Wintxt_3= '安装QQ工具栏及中文搜搜'
$Wintxt_4= '安装QQ音乐播放器'
$Wintxt_5= '安装QQLive网络电视'
$Wintxt_6= '快速启动栏'
$Wintxt_7= '下一步(&N)'
$Wintxt_8= '保存到“我的文档”(推荐)'
$Wintxt_9= '安装(&I)'
$Wintxt_10= '立即运行腾讯QQ2011'
$Wintxt_11= '开机时自动启动腾讯QQ2011'
$Wintxt_12= '设置腾讯网为主页'
$Wintxt_13= '显示新特性'
$Wintxt_14= '完成(&F)'
;$Wintxt_15= '跳过,不安装'
;--------------------------------------------------------------;窗口元素变量声明
$Exe = 'QQ2011_Setup.exe'
If ProcessExists($Exe) Then ProcessClose($Exe)
If Run($Exe) = 0 Then ShellExecute($Exe)
Do
Sleep(10);
Until WinExists($Wintitle_1)
;WinMove($Wintitle_1, "", -1000, -1000)
;--------------------------------------------------------------;程序启动,显示界面
WinWaitActive($Wintitle_1, $Wintxt_1);
ControlClick($Wintitle_1, $Wintxt_1, "Button1");---------------;点击按钮控件: 我已阅读并同意软件许可协议和青少年上网安全指引
ControlClick($Wintitle_1, $Wintxt_2, "Button3");---------------;点击按钮控件: 下一步(&N)
WinWaitActive($Wintitle_1, $Wintxt_3);
ControlClick($Wintitle_1, $Wintxt_3, "Button9");---------------;点击按钮控件: 安装QQ工具栏及中文搜搜
ControlClick($Wintitle_1, $Wintxt_4, "Button12");---------------;点击按钮控件: 安装QQ音乐播放器
ControlClick($Wintitle_1, $Wintxt_5, "Button17");---------------;点击按钮控件: 安装QQLive网络电视
ControlClick($Wintitle_1, $Wintxt_6, "Button7");---------------;点击按钮控件: 快速启动栏
ControlClick($Wintitle_1, $Wintxt_7, "Button2");---------------;点击按钮控件: 下一步(&N)
WinWaitActive($Wintitle_1, $Wintxt_8);
;ControlSetText($Wintitle_1, "", "Edit1", "C:\Program Files\Tencent\QQ");------;重置文本框控件文本
ControlClick($Wintitle_1, $Wintxt_8, "Button8");---------------;点击按钮控件: 保存到“我的文档”(推荐)
ControlClick($Wintitle_1, $Wintxt_9, "Button2");---------------;点击按钮控件: 安装(&I)
WinWaitActive($Wintitle_1, $Wintxt_10);
ControlClick($Wintitle_1, $Wintxt_10, "Button6");---------------; '立即运行腾讯QQ2011'
ControlClick($Wintitle_1, $Wintxt_11, "Button8");---------------; '开机时自动启动腾讯QQ2011'
ControlClick($Wintitle_1, $Wintxt_12, "Button9");---------------; '设置腾讯网为主页'
ControlClick($Wintitle_1, $Wintxt_13, "Button7");---------------; '显示新特性'
ControlClick($Wintitle_1, $Wintxt_14, "Button2");---------------; '完成(&F)'
If ProcessWait("QQPCDownload.exe", 2) Then ProcessClose("QQPCDownload.exe")
;--------------------------------------------------------------;结束安装QQ电脑管家提示 (如果已经安装了 就不会提示)