autoit3脚本 自动安装7zip9.20程序

;~ FileName: Install_7zip
;~ By Create Edward.zhou
;~ Date: 2012-7-15

Run ("7z920.exe")
WinWait("7-Zip 9.20 Setup","Choose Install Location")
If Not WinActivate("7-Zip 9.20 Setup","Choose Install Location") Then WinActivate("7-Zip 9.20 Setup","Choose Install Location")
WinActivate("7-Zip 9.20 Setup","Choose Install Location")
Send("{ALTDOWN}i{ALTUP}")
WinWait("7-Zip 9.20 Setup","Completing the 7-Zip 9.20 Setup Wizard")
If Not WinActivate("7-Zip 9.20 Setup","Completing the 7-Zip 9.20 Setup Wizard") Then WinActivate("7-Zip 9.20 Setup","Completing the 7-Zip 9.20 Setup Wizard")
WinActivate("7-Zip 9.20 Setup","Completing the 7-Zip 9.20 Setup Wizard")
Send("{ALTDOWN}f{ALTUP}")

Run("C:\Program Files\7-Zip\7zFM.exe")
WinWait("7-Zip 文件管理器")
If Not WinActivate("7-Zip 文件管理器") Then WinActivate("7-Zip 文件管理器")
WinActivate("7-Zip 文件管理器")
Send("!to")

WinWait("选项")
If Not WinActivate("选项") Then WinActivate("选项")
WinActivate("选项")
ControlClick("选项","全选(&A)",1023)
Sleep(1000)
ControlClick("选项","应用(&A)",12321)
ControlClick("选项","确定",1)

ProcessClose("7zFM.exe")