$hd="安装 - UltraISO"
WinWait($hd,"欢迎使用 UltraISO 安装向导")
WinActivate($hd,"欢迎使用 UltraISO 安装向导")
WinWaitActive($hd,"欢迎使用 UltraISO 安装向导")
ControlClick($hd,"","TButton2")
WinWait($hd,"许可协议")
WinActivate($hd,"许可协议")
WinWaitActive($hd,"许可协议")
ControlClick($hd,"","TRadioButton1")
ControlClick($hd,"","TButton3")
WinWait($hd,"选择目标位置")
WinActivate($hd,"选择目标位置")
WinWaitActive($hd,"选择目标位置")
ControlSetText($hd,"","TEdit1","D:\Program Files\UltraISO")
ControlClick($hd,"","TButton4")
Sleep(1000)
IF WinExists('文件夹存在')=1 Then
WinActivate('文件夹存在')
WinWaitActive('文件夹存在')
ControlClick('文件夹存在',"","Button1")
EndIf
WinWait($hd,"选择开始菜单文件夹")
WinActivate($hd,"选择开始菜单文件夹")
WinWaitActive($hd,"选择开始菜单文件夹")
ControlClick($hd,"","TButton5")
WinWait($hd,"选择附加任务")
WinActivate($hd,"选择附加任务")
WinWaitActive($hd,"选择附加任务")
Send("!d")
Send("!m")
ControlClick($hd,"","TButton5")
WinWait($hd,"准备安装")
WinActivate($hd,"准备安装")
WinWaitActive($hd,"准备安装")
ControlClick($hd,"","TButton5")
WinWait($hd,"信息")
WinActivate($hd,"信息")
WinWaitActive($hd,"信息")
ControlClick($hd,"","TButton5")
WinWait($hd,"UltraISO 安装向导完成")
WinActivate($hd,"UltraISO 安装向导完成")
WinWaitActive($hd,"UltraISO 安装向导完成")
Send("{SPACE}")
Send("{tab}")
Send("{SPACE}")
ControlClick($hd,"","TButton5")
Exit18~22行，是覆盖用的 谢谢了，我晚上回去试下~ 按你的要求写的，（你的要求就是你的代码做什么，我就做什么。。）18~22行，是覆盖用的
kn007 发表于 2010-1-25 11:07 http://www.autoitx.com/images/common/back.gif
谢谢，用你的方法解决了。
页:
1
[2]