AU3脚本自动安装QQ6.7

#RequireAdmin

#Region ;**** 由 AccAu3Wrapper_GUI 创建指令 ****

#AccAu3Wrapper_OutFile=QQ6.7_auto.exe

#AccAu3Wrapper_UseUpx=Y

#AccAu3Wrapper_UseX64=n

#AccAu3Wrapper_Res_Language=2052

#AccAu3Wrapper_Res_requestedExecutionLevel=None

#AccAu3Wrapper_Add_Constants=Y

#EndRegion ;**** 由 AccAu3Wrapper_GUI 创建指令 ****

;TrayTip(" 安装提示 ", "为避免自动安装期间操作失败，请勿乱动键盘鼠标" & @CRLF & @CRLF & "若长时间无反应可按 F11 退出", 30, 4)

;Sleep(3000)

#Region

;**********************

;安装准备开始。。。。。

;**********************

;启动QQ程序

Run("QQ6.7.exe")

;等待QQ的安装向导出现

WinWait("腾讯QQ安装向导")

;激活QQ安装向导为当前窗口，可选步骤

WinActivate("腾讯QQ安装向导","立即安装")

;点击自定义选项

Sleep(1000)

ControlClick("腾讯QQ安装向导","立即安装","Button6")

;去掉添加到快速启动栏

Sleep(100)

ControlClick("腾讯QQ安装向导","立即安装","Button9")

;去掉开机自动启动

Sleep(100)

ControlClick("腾讯QQ安装向导","立即安装","Button10")

;选择立即安装

Sleep(100)

ControlClick("腾讯QQ安装向导","立即安装","Button3")

#EndRegion

#Region

;**********************

;正式安装开始，安装中 ;

;**********************

;检测安装完成的窗口出现，未出现时一直等待

WinWait("腾讯QQ安装向导","完成安装")

#EndRegion

#Region

;***************************

;安装完成，修改不需要的选项;

;现在的软件安装过程中的推荐

;软件都是根据官方的推广自动

;生成的，所以还是将有可能出

;现的地方点击一遍

;***************************

;去掉勾选，管家+金山毒霸

Sleep(100)

ControlClick("腾讯QQ安装向导","完成安装","Button1")

;去掉勾选QQ浏览器

Sleep(100)

ControlClick("腾讯QQ安装向导","完成安装","Button2")

;去掉勾选QQ收藏助手

Sleep(100)

ControlClick("腾讯QQ安装向导","完成安装","Button3")

;去掉勾选QQ音乐播放器

Sleep(100)

ControlClick("腾讯QQ安装向导","完成安装","Button4")

;点击完成安装

Sleep(100)

ControlClick("腾讯QQ安装向导","完成安装","Button8")

;检测QQ程序是否运行，如果运行则结束进程

$t=0

Do

Sleep(3000)

$t=$t+1

Until( ProcessExists("QQ.exe") Or $t >=20 )

;使用杀死进程的方式关闭QQ，会出现错误，但是目前还没有别的有效方法。

ProcessClose("QQ.exe")

#EndRegion

本文转自秘飞虎51CTO博客，原文链接：http://blog.51cto.com/mifeihu/1598207 ，如需转载请自行联系原作者