软件自动安装到最后一步就不动了，帮我看看问题出在哪？

kn007

按你的要求写的，（你的要求就是你的代码做什么，我就做什么。。）

Run(@ScriptDir & "\UltraISO_8.66_YlmF.exe")
$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")
Exit

18~22行，是覆盖用的

tianya1631

谢谢了，我晚上回去试下~

tianya1631

按你的要求写的，（你的要求就是你的代码做什么，我就做什么。。）18~22行，是覆盖用的
kn007 发表于 2010-1-25 11:07

谢谢，用你的方法解决了。