无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站广告联系 微信:wuyouceo QQ:184822951
查看: 2705|回复: 1
打印 上一主题 下一主题

[求助] 哪位兄弟帮忙看看这段au3代码

[复制链接]
跳转到指定楼层
1#
发表于 2010-12-10 10:22:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
写了一个nod2.7的au3代码以实现自动安装,考虑到xp和2003系统的不同,用了if...then语句,但是很奇怪,条件判断语句执行之后脚本就停滞不前了,代码如下:


++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

MsgBox(4096, "注意!", "程序安装过程中,请不要有任何键鼠操作!", 3)
blockinput (1)
Run("setup.exe")
WinWaitActive("设定向导","欢迎使用NOD32设定程序")
ControlClick("设定向导","欢迎使用NOD32设定程序","[class:Button;ID:12324]")
WinWaitActive("最终用户软件使用协议","我同意")
ControlClick("最终用户软件使用协议","我同意","[class:Button;ID:1011]")
ControlClick("最终用户软件使用协议","我同意","[class:Button;ID:12324]")
WinWaitActive("自动更新设定","以后再设定更新参数")
ControlClick("自动更新设定","以后再设定更新参数","[class:Button;ID:3053]")
ControlClick("自动更新设定","以后再设定更新参数","[class:Button;ID:12324]")
WinWaitActive("ThreatSense.Net","预警系统")
ControlClick("ThreatSense.Net","预警系统","[class:Button;ID:12324]")
WinWaitActive("不受欢迎软件侦测","启动不受欢迎软件侦测")
ControlClick("不受欢迎软件侦测","启动不受欢迎软件侦测","[class:Button;ID:1025]")
ControlClick("不受欢迎软件侦测","启动不受欢迎软件侦测","[class:Button;ID:12324]")
WinWaitActive("文件实时监控AMON","我希望自动加载文件实时监控")
ControlClick("文件实时监控AMON","我希望自动加载文件实时监控","[class:Button;ID:12324]")
if WinWaitActive("网络监视","侦测来自互联网的入侵") then
ControlClick("网络监视","侦测来自互联网的入侵","[class:Button;ID:1000]")
ControlClick("网络监视","侦测来自互联网的入侵","[class:Button;ID:12324]")
EndIf
WinWaitActive("安装参数全部设定完毕","安装参数全部设定完毕") then
ControlClick("安装参数全部设定完毕","安装参数全部设定完毕","[class:Button;ID:12324]")
WinWaitActive("安装完成","需要重新启动")
ControlClick("安装完成","需要重新启动","[class:Button;ID:1011]")
ControlClick("安装完成","需要重新启动","[class:Button;ID:12325]")
FileDelete (@StartMenuCommonDir&"\程序\Eset\自述文件.lnk")
FileDelete (@StartMenuCommonDir&"\程序\Eset\卸载.lnk")
FileDelete (@StartMenuCommonDir&"\程序\Eset\帮助.lnk")
exit

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

xp环境下上述代码执行后,nod安装到"安装参数全部设定完毕"就停止了,2003环境正常,请问哪儿错了?该怎么写?
2#
发表于 2010-12-13 19:55:43 | 只看该作者
if WinWaitActive("网络监视","侦测来自互联网的入侵") then
ControlClick("网络监视","侦测来自互联网的入侵","[class:Button;ID:1000]")
ControlClick("网络监视","侦测来自互联网的入侵","[class:Button;ID:12324]")
EndIf
WinWaitActive("安装参数全部设定完毕","安装参数全部设定完毕") then //这里是什么意思?上面的IF块已经关闭这个then是干嘛的?
ControlClick("安装参数全部设定完毕","安装参数全部设定完毕","[class:Button;ID:12324]")
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-5-17 09:16

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表