遨游 新版自动安装脚本

xpboy

遨游 新版自动安装脚本
软件下载地址

下载软件

下面是脚本

 
;网站改版了第一个小脚本
ProcessClose("Maxthon.exe") ;检测当前电脑是不是再运行遨游并关掉进程
;定义量，以便下面脚本方便使用。
$_1="傲游浏览器 2 安装 "
$_2="许可证协议"
$_3="选择安装位置"
$_4="不能打开要写入的文件: "
$_5="正在完成“傲游浏览器 2”安装向导"
;开始安装
Run("mx_2.1.0.2082cn.exe");运行安装程序
WinWait($_1,$_2);等待安装窗口
If Not WinActivate($_1,$_2) Then;检测当前窗口是否存在
WinActivate($_1,$_2);如果存在的话并激活
WinWaitActive($_1,$_2);等待安装窗口
EndIf;结束判断
ControlClick($_1,$_2,"Button2");点击按钮下一步
WinWait($_1,$_3);等待安装窗口
If Not WinActivate($_1,$_3) Then ;检测当前窗口是否存在
WinActivate($_1,$_3);如果存在的话并激活
WinWaitActive($_1,$_3);;等待安装窗口
EndIf;结束判断
ControlClick($_1,$_3,"Button2");点击按钮下一步
WinWait($_1,"正在安装");检查当前的窗口是否存在
If WinActivate($_1,"正在安装") Then
WinActivate($_1,"正在安装")
WinWaitActive($_1,"正在安装")
WinWait($_1,"正在安装")
EndIf;结束判断
WinWait($_1,$_5)
If Not WinActivate($_1,$_5) Then
WinActivate($_1,$_5)
WinWaitActive($_1,$_5)
EndIf
ControlClick($_1,$_5,"Button4");去掉对勾
ControlClick($_1,$_5,"Button2");完成关闭

[ 本帖最后由 xpboy 于 2008-5-21 11:07 编辑 ]

bsplin

感谢分享！

pchome2000

感谢分享！         

leeyva

感谢分享！

颜勇

这些这么简单 还要钱啊

a2295926

回复 1# xpboy


    If Not WinActivate($_1,$_2) Then;检测当前窗口是否存在
前窗口是否存在不是用 WinActivate 而是用WinActive

包谷面

这个都出自动安装了

坏坏

谢谢，新手学习了！！！

chiiren

謝謝，新手學習了！！！