一键安装QQ2012
;**
; QQ Auto Install Autoit Script
;
; @name OneKeyInstallQQ.au3
; @author http://www.dumiq.com
; @copyright CopyRight (c) 2012 http://www.dumiq.com
; @license GNU General Public License 2.0
; @version V1.0.2012.1116
;**
; QQ Auto Install Autoit Script
;
; @name OneKeyInstallQQ.au3
; @author http://www.dumiq.com
; @copyright CopyRight (c) 2012 http://www.dumiq.com
; @license GNU General Public License 2.0
; @version V1.0.2012.1116
;**
#RequireAdmin
Dim $title="腾讯QQ2012 安装向导"
Run("QQ2012.exe")
;请将 QQ2012.exe 和本脚本文件置于同一目录下
;请将 QQ2012.exe 和本脚本文件置于同一目录下
TrayTip("", "正在安装QQ2012,请不要操作键盘或鼠标否则程序将无法自动安装下去!",15,1)
WinWait($title)
WinActivate($title,"在安装软件前,请仔细阅读下面的软件许可协议")
WinActivate($title,"在安装软件前,请仔细阅读下面的软件许可协议")
Sleep(500)
ControlClick($title,"我已阅读并同意软件许可协议","Button1")
Sleep(500)
ControlClick($title,"下一步(&N)","Button3")
Sleep(500)
ControlClick($title,"安装QQ工具栏及中文搜搜","Button8") ;这是反选,即不安装。
Sleep(500)
ControlClick($title,"免费独享","Button11") ;这是反选,即不安装。
Sleep(500)
ControlClick($title,"下一步(&N)","Button2")
Sleep(500)
ControlSetText($title,"程序安装目录","Edit1","D:\Program Files\Tencent\QQ")
Sleep(1000)
ControlClick($title,"保存到安装目录下","Button7")
Sleep(500)
ControlClick($title,"安装(&I)","Button2")
ControlClick($title,"我已阅读并同意软件许可协议","Button1")
Sleep(500)
ControlClick($title,"下一步(&N)","Button3")
Sleep(500)
ControlClick($title,"安装QQ工具栏及中文搜搜","Button8") ;这是反选,即不安装。
Sleep(500)
ControlClick($title,"免费独享","Button11") ;这是反选,即不安装。
Sleep(500)
ControlClick($title,"下一步(&N)","Button2")
Sleep(500)
ControlSetText($title,"程序安装目录","Edit1","D:\Program Files\Tencent\QQ")
Sleep(1000)
ControlClick($title,"保存到安装目录下","Button7")
Sleep(500)
ControlClick($title,"安装(&I)","Button2")
WinWait($title,"安装完成")
WinActivate($title,"安装完成")
WinActivate($title,"安装完成")
Sleep(500)
ControlClick($title,"开机时自动启动腾讯QQ2012","Button8")
Sleep(500)
ControlClick($title,"立即运行腾讯QQ2012","Button6")
Sleep(500)
ControlClick($title,"设置腾讯网为主页","Button9")
Sleep(500)
ControlClick($title,"显示新特性","Button7")
Sleep(500)
ControlClick($title,"完成(&F)","Button2")
ControlClick($title,"开机时自动启动腾讯QQ2012","Button8")
Sleep(500)
ControlClick($title,"立即运行腾讯QQ2012","Button6")
Sleep(500)
ControlClick($title,"设置腾讯网为主页","Button9")
Sleep(500)
ControlClick($title,"显示新特性","Button7")
Sleep(500)
ControlClick($title,"完成(&F)","Button2")
Exit
标签: au3
日历
存档
最新评论
- vodenia
在线工作可以为您带来丰厚的利润。 htt... - vodenia
在几分钟内从1美元赚1000美元。 现在... - vodenia
立即将1 1变成$100。 使用金融机器... - vodenia
当你启动机器人时,不需要再工作了! ht... - vodenia
机器人是每个寻求财务独立的人的最佳方式。... - vodenia
寻找额外的钱? 尝试最好的金融工具。 h... - vodenia
我们知道如何让我们的未来变得富有,你呢?... - vodenia
现在,世界各地的任何人都可以获得额外的收... - vodenia
需要钱吗? 轻松拿到这里! 只要按这个启... - vodenia
每周在这里在线工作数千人。 https:...
发表评论: