谢谢
能帮我精简吗?觉得这样不方便
;本脚本由i-Autoit-1.01 正式版 生成 ,非常感谢您的使用,请保留此脚本声明! 2010年10月20日
;--------------------------------------------------------------;脚本开始
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= 'WinRAR 自解压文件'
$WinTitle_2= '输入密码'
$WinTitle_3= '确认文件替换'
$Wintxt_1= '目标文件夹(&D)'
$Wintxt_2= 'audit.wxs'
$Wintxt_3= '下列文件已经存在'
;--------------------------------------------------------------;窗口元素变量声明
$Exe = 'Wx.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($Wintitle_1, $Wintxt_1);
ControlSetText($Wintitle_1, $Wintxt_1, "Edit1", "d:\123");------;重置文本框控件文本
ControlClick($Wintitle_1, $Wintxt_1, "Button2");---------------;点击按钮控件: 安装
WinWaitActive($Wintitle_2, $Wintxt_2);
ControlSetText($Wintitle_2, $Wintxt_2, "Edit1", "123456");------;重置文本框控件文本
ControlClick($Wintitle_2, $Wintxt_2, "Button1");---------------;点击按钮控件: 确定
WinWaitActive($Wintitle_3, $Wintxt_3);
ControlClick($Wintitle_3, $Wintxt_3, "Button1");---------------;点击按钮控件:
ControlClick($Wintitle_3, $Wintxt_3, "Button3");---------------;点击按钮控件: 全部选是(&A) |