论坛 › 『 提问交流 』 › 初学AU3,求一个"360安全卫士"的自动安装脚本

6wings 发表于 2008-12-25 20:30:43

初学AU3,求一个"360安全卫士"的自动安装脚本

如题:小弟不才,初学AU3,求一个"360安全卫士"的自动安装AU3脚本,新版360刚开始安装的时候会先查杀流行木马,颇为困扰是的,我是直接安装呢?还是等它扫描完毕?要是查到木马的话还要查杀,360会提示要重启,然后会开始提示安装,360下载地址http://down.360safe.com/setup.exe
谢谢各位大侠!!

[ 本帖最后由 6wings 于 2008-12-31 09:27 编辑 ]

zzm0163 发表于 2008-12-27 14:29:09

run("setup.exe")
winwait("")
controlclick("","继续安装",1013)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","下一步(&N) >",1)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","我接受(&I)",1)
sleep(1000)
;controlsettext(" 360安全卫士 4.4.1.1009 安装 ","",1019,"e:Program Files360safe")
;sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","安装(&I)",1)
sleep(8000)
controlclick(" 360安全卫士 4.4.1.1009 安装","下一步(&N) >",1)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","下一步(&N) >",1)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","了解 360安全卫士",1204)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","完成(&F)",1)


我也是刚学，在我的机器上面能运行，如果要更改360的安装目录，就 自己对应着改就好了，上面这些你看看能不能在你的机器上面运行，不行的话，就继续跟帖

6wings 发表于 2008-12-27 15:03:02

Run("psetup1646336.exe")
WinWait("360安全卫士 4.4.1.1009 安装","欢迎使用“360安全卫士”安装向导")
ControlClick("360安全卫士 4.4.1.1009 安装","欢迎使用“360安全卫士”安装向导","Button2")
WinWait("360安全卫士 4.4.1.1009 安装","许可证协议")
ControlClick("360安全卫士 4.4.1.1009 安装","许可证协议","Button2")
WinWait("360安全卫士 4.4.1.1009 安装","选择安装位置")
ControlSetText("360安全卫士 4.4.1.1009 安装","选择安装位置","Edit1","D:Program Files360safe（6wings）")
ControlClick("360安全卫士 4.4.1.1009 安装","选择安装位置","Button2")
WinWait("360安全卫士 4.4.1.1009 安装","360安全卫士实时保护以及保险箱设置")
ControlClick("360安全卫士 4.4.1.1009 安装","360安全卫士实时保护以及保险箱设置","Button2")
WinWait("360安全卫士 4.4.1.1009 安装","360安全卫士定时检测设置")
ControlClick("360安全卫士 4.4.1.1009 安装","360安全卫士定时检测设置","Button2")
WinWait("360安全卫士 4.4.1.1009 安装","正在完成“360安全卫士”安装向导")
ControlClick("360安全卫士 4.4.1.1009 安装","正在完成“360安全卫士”安装向导","Button4")
ControlClick("360安全卫士 4.4.1.1009 安装","正在完成“360安全卫士”安装向导","Button5")
ControlClick("360安全卫士 4.4.1.1009 安装","正在完成“360安全卫士”安装向导","Button2")


谢谢你了，您看看我的，我这种方式都行不通，我发现AU3的自动安装脚本有好几种版本，有的是用类似这样：
WinWait("360安全卫士 4.4.1.1009 安装","欢迎使用“360安全卫士”安装向导")
ControlClick("360安全卫士 4.4.1.1009 安装","欢迎使用“360安全卫士”安装向导","Button2")
有的是：
WinWaitActive("搜狗拼音输入法 3.5奥运版 安装", "欢迎使用“搜狗拼音输入法 3.5奥运版”安装向导")
Send("!N")
WinWaitActive("搜狗拼音输入法 3.5奥运版 安装", "许可证协议")
Send("!I")

而你的是：
controlclick("","继续安装",1013)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","下一步(&N) >",1)
sleep(1000)


可以跟是说说这几种的不同在哪吗？还有我发现我用第一种方式写的在按装的时候反应比较快，不知道是不是错觉，用你的方式安装中的程序反映比较慢些，但是可以实现，再次谢谢您老拉！！！

zzm0163 发表于 2008-12-27 18:32:43

慢是因为，我在执行没个命令的时候，都延迟了1秒sleep(1000)
你不觉得我写的比较明了，简单，你写的很烦琐，让我看了不知道从哪里下手，呵呵
建议：在点类似下一步，完成等命令时，使用controlclick,因为send命令有时会不管用
但是还是要根据个人爱好

[ 本帖最后由 zzm0163 于 2008-12-27 18:36 编辑 ]

6wings 发表于 2008-12-27 18:39:16

你好，zzm0163
我发现我加了
msgBox(1, "温馨提示", "您好,现在将开始安装360安全卫士,安装过程中请不要做其他操作")
后如果我不即时点确定的话，或者等待几秒钟后再点确定的话，脚本会不起作用，变成了手动的了。。。


能再展示其他种脚本编写方法来实现自动安装这个360吗
就比如我之前疑问的那几种方式？？

[ 本帖最后由 6wings 于 2008-12-27 18:41 编辑 ]

zzm0163 发表于 2008-12-27 18:58:06

你想在安装前，有个提示，但是哪个提示有要点确定，有时候，他必须手工去点，我想过这样，我在写的时候，想让提示停留3秒然后自己点确定，有时候不行，反正都是自己用，我就不要这些华丽的东西了

6wings 发表于 2008-12-27 19:53:36

因为我是一次装2个软件我怕会其中一个会停止,所以第一个软件直接自动安装,第2个就弹一个提示,等第一个安装好了用户发现第二个软件的提示的时候自己点确定以继续安装第二个,要设定一个时间内自动点确定这样下面的脚本才保证乖乖地继续下去是 吗?~~好像有一种编写方式可以在窗口不是主窗口的时候还能自己继续安装???老大

zzm0163 发表于 2008-12-27 23:12:52

不清楚，也许我该去看看帮助，呵呵

6wings 发表于 2008-12-28 09:32:58

哈,大家一起继续研究,我估计要先从这些基本命令的意思学起,忽忽

lyicy 发表于 2009-1-6 12:46:45

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_outfile_type=a3x
#AutoIt3Wrapper_outfile=setup.a3x
#AutoIt3Wrapper_UseX64=y
#AutoIt3Wrapper_Change2CUI=y
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
Run("setup.exe")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","欢迎使用“360安全卫士”安装向导")
ControlClick (" 360安全卫士 4.4.1.1011 安装","欢迎使用“360安全卫士”安装向导","Button2")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","许可证协议")
ControlClick (" 360安全卫士 4.4.1.1011 安装","许可证协议", "Button2")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","选择安装位置")
ControlSetText(" 360安全卫士 4.4.1.1011 安装","选择安装位置","Edit1","D:\Program Files\360safe")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","选择安装位置")
ControlClick (" 360安全卫士 4.4.1.1011 安装","选择安装位置", "Button2")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","360安全卫士实时保护以及保险箱设置")
ControlClick (" 360安全卫士 4.4.1.1011 安装","360安全卫士实时保护以及保险箱设置", "Button4")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","360安全卫士实时保护以及保险箱设置")
ControlClick (" 360安全卫士 4.4.1.1011 安装","360安全卫士实时保护以及保险箱设置", "Button5")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","360安全卫士实时保护以及保险箱设置")
ControlClick (" 360安全卫士 4.4.1.1011 安装","360安全卫士实时保护以及保险箱设置", "Button2")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","完成")
ControlClick (" 360安全卫士 4.4.1.1011 安装","完成", "Button4")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","完成")
ControlClick (" 360安全卫士 4.4.1.1011 安装","完成", "Button5")
Sleep(50)
WinWaitActive(" 360安全卫士 4.4.1.1011 安装","完成")
ControlClick (" 360安全卫士 4.4.1.1011 安装","完成", "Button2")
Sleep(250)

FileDelete("360安全卫士.lnk")
FileDelete("360保险箱.lnk")
FileDelete("修复360安全卫士.lnk")
FileDelete("360软件管理.lnk")






我扒的 :face (33):

121044246 发表于 2009-1-7 19:39:34

原帖由 6wings 于 2008-12-27 18:39 发表 http://autoitx.com/images/common/back.gif
你好，zzm0163
我发现我加了
msgBox(1, "温馨提示", "您好,现在将开始安装360安全卫士,安装过程中请不要做其他操作")
后如果我不即时点确定的话，或者等待几秒钟后再点确定的话，脚本会不起作用，变成了手动的了。 ...


msgBox(1, "温馨提示", "您好,现在将开始安装360安全卫士,安装过程中请不要做其他操作",3)
在后面加是超时退出的话,3秒后不按确定他会自动关掉提示窗口继续安装

6wings 发表于 2009-1-20 14:46:21

:face (37):    恩恩,我也发现啦,谢谢你哈 楼上的大哥,我最近进步不少,哈哈,发现之前自己很菜

hanshiqi2000 发表于 2009-2-13 00:59:47

我也给你个这个是 新版的 :face (33):

Run("360SAFE.EXE")
WinWait(" 360安全卫士 5.0.0.1025 安装","欢迎使用")
ControlClick(" 360安全卫士 5.0.0.1025 安装","欢迎使用","Button2")
WinWait(" 360安全卫士 5.0.0.1025 安装","许可证协议")
Send("!I")
WinWait(" 360安全卫士 5.0.0.1025 安装","选择安装位置")
Send("!I")
WinWait(" 360安全卫士 5.0.0.1025 安装","实时保护设置")
Send("!N")
WinWait(" 360安全卫士 5.0.0.1025 安装","保险箱安装设置")
Send("!N")
WinWait(" 360安全卫士 5.0.0.1025 安装","正在完成")
ControlClick(" 360安全卫士 5.0.0.1025 安装","正在完成","Button5")
Send("!F")
FileDelete("C:Documents and SettingsAdministrator桌面修复360安全卫士.lnk")
Exit

boyblog 发表于 2009-3-2 13:12:49

我用的是最新版本5.0.将待安装的文件名改成"psetup1101801.exe"

Run("psetup1101801.exe")

WinWait(" 360安全卫士 5.0.0.1030 安装","欢迎使用“360安全卫士”安装向导")   
WinWaitActive(" 360安全卫士 5.0.0.1030 安装","欢迎使用“360安全卫士”安装向导")
Send("!n")
WinWait(" 360安全卫士 5.0.0.1030 安装","最终用户授权协议")   
WinWaitActive(" 360安全卫士 5.0.0.1030 安装","最终用户授权协议")
Send("!i")
WinWait(" 360安全卫士 5.0.0.1030 安装","请选择安装位置")   
WinWaitActive(" 360安全卫士 5.0.0.1030 安装","请选择安装位置")
Sleep(500)
Send("!i")
WinWait(" 360安全卫士 5.0.0.1030 安装","360安全卫士实时保护设置")   
WinWaitActive(" 360安全卫士 5.0.0.1030 安装","360安全卫士实时保护设置")
Send("!n")
WinWait(" 360安全卫士 5.0.0.1030 安装","360安全卫士保险箱安装设置")   
WinWaitActive(" 360安全卫士 5.0.0.1030 安装","360安全卫士保险箱安装设置")
Send("{Space}")
Sleep(500)
Send("!n")
WinWait(" 360安全卫士 5.0.0.1030 安装","正在完成“360安全卫士”安装向导")   
WinWaitActive(" 360安全卫士 5.0.0.1030 安装","正在完成“360安全卫士”安装向导")
Send("{Space}{tab}{space}")
Sleep(500)
Send("!f")

xrbenbeba 发表于 2009-3-2 13:55:09

原帖由 zzm0163 于 2008-12-27 14:29 发表 http://www.autoitx.com/images/common/back.gif
run("setup.exe")
winwait("")
controlclick("","继续安装",1013)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","下一步(&N) >",1)
sleep(1000)
controlclick(" 360安全卫士 4.4.1.1009 安装","我 ...
大哥别误人子弟了

你这脚本 机器性能好行 不好的话 1秒不弹出窗口 怎么用怎么错

查看完整版本: 初学AU3,求一个"360安全卫士"的自动安装脚本