Run(@ScriptDir & "\ACDSEE2009.exe")
$a="ACDSee Photo Manager 2009 - InstallShield 向导"
WinWaitActive($a,"InstallShield(R) 向导")
send("!n")
WinWaitActive($a,"许可协议")
ControlClick($a,"许可协议","Button3")
ControlClick($a,"许可协议","Button5")
WinWaitActive("ACDSee Photo Manager 2009 InstallShield Wizard","用户信息")
Send("dad",1);输入用户姓名
Send("{TAB}")
Send("system",1);输入单位
send("{TAB}{LEFT}");选择试用版,完全版需输入代码 我没有
Send("!n")
WinWaitActive($a,"安装类型")
send("!n")
WinWaitActive($a,"外部程序集成安装")
send("!n")
WinWaitActive($a,"安装谷歌拼音输入法")
ControlClick($a,"安装谷歌拼音输入法","Button9");不安装谷歌拼音
ControlClick($a,"安装谷歌拼音输入法","Button6");单击下一步
WinWaitActive($a,"已准备好安装程序")
send("!i")
WinWaitActive($a,"InstallShield 向导已完成")
ControlClick($a,"InstallShield 向导已完成","Button5")
ControlClick($a,"InstallShield 向导已完成","Button1")
Exit
你自己修改一下了 |