360安全卫士
$title= " 360安全卫士"WinWait($title,"欢迎使用")
Sleep(1000)
ControlClick($title,"欢迎使用","下一步(&N) >")
WinWait($title,"最终用户授权协议")
If WinGetText ($title,"接受并安装")Then _360()
Sleep(100)
ControlClick($title,"最终用户授权协议","我接受(&I)")
WinWait($title,"请选择安装位置")
Sleep(100)
ControlSetText ($title,"请选择安装位置","Edit1","c:\Program Files\360\360safe")
Sleep(100)
ControlClick($title,"请选择安装位置","安装(&I)")
WinWait($title,"360安全卫士浏览器安装设置")
Sleep(100)
ControlClick($title,"360安全卫士浏览器安装设置","Button4")
Sleep(100)
ControlClick($title,"360安全卫士浏览器安装设置","下一步(&N) >")
WinWait($title,"正在完成")
Sleep(100)
ControlClick($title,"正在完成","完成(&F)")
Sleep(100)
If WinExists($title,"你的系统需要重新启动") Then ControlClick($title,"你的系统需要重新启动","否(&N)")
FileDelete(@DesktopDir&"\360软件管家.lnk")
FileDelete(@DesktopDir&"\修复360安全卫士.lnk")
Exit
Func _360()
Sleep(100)
ControlClick($title,"最终用户授权协议","接受并安装")
WinWait($title,"360安全卫士浏览器安装设置")
Sleep(100)
ControlClick($title,"360安全卫士浏览器安装设置","Button4")
Sleep(100)
ControlClick($title,"360安全卫士浏览器安装设置","下一步(&N) >")
WinWait($title,"正在完成")
Sleep(100)
ControlClick($title,"正在完成","完成(&F)")
Sleep(1000)
If WinExists($title,"你的系统需要重新启动") Then ControlClick($title,"你的系统需要重新启动","否(&N)")
FileDelete(@DesktopDir&"\360软件管家.lnk")
FileDelete(@DesktopDir&"\修复360安全卫士.lnk")
Exit
EndFunc 你使用脚本把360软件安装好了,360却把你的脚本杀了!!! 正解......................... 安装就行啦~! 1楼正解{:face (84):} 1楼正解{:face (84):} 不加FileDelete(@DesktopDir&"\360软件管家.lnk")
FileDelete(@DesktopDir&"\修复360安全卫士.lnk")
就不会被删啦!!
360防火墙作怪 我回 回帖是美德 现在很多反病毒软件,对自动安装脚本过敏呀! 能学到很多东西啊 不用360路过 谢谢分享,这个需要。。 怎么没有写清版本呢 谢谢分享,收藏了 謝謝大大分享 回帖是美德 希望您有更多的作品~~謝謝
页:
[1]
2