;本脚本由i-Autoit-1.01 正式版 生成 ,非常感谢您的使用,请保留此脚本声明! 2011年05月25日
;--------------------------------------------------------------;脚本开始
Opt("TrayIconDebug", 1) ;0=无信息, 1=调试信息
Opt("WinTextMatchMode", 2) ;1=完全匹配, 2=快速匹配
Opt("WinTitleMatchMode", 4) ;1=开头, 2=子串, 3=完全, 4=高级
Opt("WinSearchChildren", 1) ;0=不搜索, 1=搜索子窗口
Opt("WinDetectHiddenText", 1) ;0=不检测, 1=检测
;--------------------------------------------------------------;设置脚本参数
$WinTitle_1= '易飞 ERP 系统客户端安装向导'
$WinTitle_2= '易飞程序更新精灵-ver: 7.0.0.0'
$Wintxt_0= ''
$Wintxt_1= '下一步 ->'
$Wintxt_2= '自定义安装/升级'
$Wintxt_3= '跳过此步'
$Wintxt_4= '开始安装 ->'
;--------------------------------------------------------------;窗口元素变量声明
$Exe = '\\10.1.2.20\soft\erp\ERP70\ERp70\LeaderSetup.exe'
If ProcessExists($Exe) Then ProcessClose($Exe)
If Run($Exe) = 0 Then ShellExecute($Exe)
Do
Sleep(10);
Until WinExists($Wintitle_1)
;WinMove($Wintitle_1, "", -1000, -1000)
;--------------------------------------------------------------;程序启动,显示界面
WinWaitActive("易飞 ERP 系统客户端安装向导","取消")
Opt("MouseCoordMode", 0)
MouseClick ( "left",300,400)
WinWaitActive($Wintitle_1, $Wintxt_1);
ControlClick($Wintitle_1, $Wintxt_1, "TRadioButton2");---------------;点击按钮控件: 我同意以上许可协议中所有条款
WinWaitActive($Wintitle_1, $Wintxt_1);
ControlClick($Wintitle_1, $Wintxt_1, "TBitBtn2");---------------;点击按钮控件: 下一步 ->
WinWaitActive($Wintitle_1, $Wintxt_2);
ControlSetText($Wintitle_1, $Wintxt_2, "TDsBtnEdit1", "D:\Conductor70");------;重置文本框控件文本
ControlSetText($Wintitle_1, $Wintxt_2, "TDsEdit1", "10.1.2.6");------;重置文本框控件文本
ControlClick($Wintitle_1, $Wintxt_2, "TBitBtn2");---------------;点击按钮控件: 下一步 ->
WinWaitActive($Wintitle_1, $Wintxt_4);
ControlClick($Wintitle_1, $Wintxt_3, "TBitBtn2");---------------;点击按钮控件: 开始安装 ->
WinWait("易飞 ERP 系统客户端安装向导","完成安装");
ControlClick("易飞 ERP 系统客户端安装向导","完成安装","TRadioButton3")
ControlClick("易飞 ERP 系统客户端安装向导","完成安装","TBitBtn2")