wurich614 发表于 2011-5-6 14:32:33

i-Aotit 自动安装 winrar4.0

i-Aotit 后修改添加 有什么不对的地方给下提示 谢谢
之前不知道/s 所以写了 就发出来了;本脚本由i-Autoit-1.01 正式版 生成 ,非常感谢您的使用,请保留此脚本声明!2011年05月03日

;--------------------------------------------------------------;脚本开始
Opt("TrayIconDebug", 1) ;0=无信息, 1=调试信息
Opt("WinTextMatchMode", 1) ;1=完全匹配, 2=快速匹配
Opt("WinTitleMatchMode", 1) ;1=开头, 2=子串, 3=完全, 4=高级
Opt("WinSearchChildren", 1) ;0=不搜索, 1=搜索子窗口
Opt("WinDetectHiddenText", 1) ;0=不检测, 1=检测
;--------------------------------------------------------------;设置脚本参数
$WinTitle_1= 'WinRAR'
$WinTitle_2= 'WinRAR'
$Wintxt_1= '安装'
$Wintxt_2= '确定'
$Wintxt_3= '完成'
;--------------------------------------------------------------;窗口元素变量声明
TrayTip ( "温馨提示", "正在自动安装请不要动鼠标键盘"&@CRLF&"反馈http://www.joz7.com",5,4)
;--------------------------------------------------------------;右下角气泡提示

$Exe = 'winrar_setup.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);
ControlClick($Wintitle_1, $Wintxt_1, "Button2");---------------;点击按钮控件: 安装

WinWaitActive($Wintitle_2, $Wintxt_2);
ControlClick($Wintitle_2, $Wintxt_2, "Button27");---------------;点击按钮控件: 确定

WinWaitActive($Wintitle_2, $Wintxt_3);
ControlClick($Wintitle_2, $Wintxt_3, "Button1");---------------;点击按钮控件: 完成

;[猎杀窗口]

Do
Sleep(500)
WinWait("WinRAR", "")
Until WinClose("WinRAR", "")= 1;--------猎杀窗口--------

z110110 发表于 2011-5-21 03:12:41

WINRAR自带静默参数 /S 多简单啊，用这个有些大材小用了。

zhy123 发表于 2011-6-25 14:18:37

WINRAR自带静默参数 /S 多简单啊，用这个有些大材小用了。

sesun 发表于 2011-7-24 11:04:07

很多命令不知道是干什么的 解释一下吧

jasonny 发表于 2013-12-26 23:20:48

謝謝大大分享，收藏了

ak47gglllk 发表于 2013-12-27 10:12:48

感谢大家分享，收藏了
页: [1]
查看完整版本: i-Aotit 自动安装 winrar4.0