|
发表于 2010-3-10 19:37:11
|
显示全部楼层
Run("qq2009.exe")
WinWait("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009")
ControlCommand("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009","Button1","Check")
Send("!n")
WinWait("腾讯QQ2009 安装向导","自定义安装选项")
ControlCommand("腾讯QQ2009 安装向导","自定义安装选项","Button9","UnCheck")
ControlCommand("腾讯QQ2009 安装向导","自定义安装选项","Button8","UnCheck")
ControlCommand("腾讯QQ2009 安装向导","自定义安装选项","Button10","UnCheck")
ControlCommand("腾讯QQ2009 安装向导","自定义安装选项","Button11","UnCheck")
ControlCommand("腾讯QQ2009 安装向导","自定义安装选项","Button7","UnCheck")
Send("!n")
WinWait("腾讯QQ2009 安装向导","请选择安装路径")
ControlSetText("腾讯QQ2009 安装向导","请选择安装路径","Edit1","d:\backup\qq")
Send("!i")
If WinExists("腾讯QQ2009 安装向导","您选择的目录安装了旧版本") Then
Send("!y")
EndIf
WinWait("腾讯QQ2009 安装向导","安装完成")
ControlCommand("腾讯QQ2009 安装向导","安装完成","Button6","UnCheck")
ControlCommand("腾讯QQ2009 安装向导","安装完成","Button7","UnCheck")
ControlCommand("腾讯QQ2009 安装向导","安装完成","Button8","UnCheck")
Send("!f")
Exit |
|