a786212077a 发表于 2009-8-11 21:35:10

360自动安装麻烦高手帮我看一下

Run("setupbeta_5.3beta.exe")
WinWaitActive(" 360安全卫士 5.3.0.1001 安装", "欢迎使用“360安全卫士”安装向导")
ControlClick(" 360安全卫士 5.3.0.1001 安装", "下一步(&N) >", "Button2")
WinWaitActive(" 360安全卫士 5.3.0.1001 安装", "最终用户授权协议")
ControlClick(" 360安全卫士 5.3.0.1001 安装", "我接受(&I)", "Button2")
WinWaitActive(" 360安全卫士 5.3.0.1001 安装", "请选择安装位置")
;安装位置默认为:C:\Program Files\360\360Safe
ControlClick(" 360安全卫士 5.3.0.1001 安装", "安装(&I)", "Button2")
WinWaitActive(" 360安全卫士 5.3.0.1001 安装", "360安全卫士保险箱安装设置")
ControlCommand(" 360安全卫士 5.3.0.1001 安装", "立即安装360保险箱", "Button4", "UnCheck")
;不安装360保险箱
ControlClick(" 360安全卫士 5.3.0.1001 安装", "下一步(&N) >", "Button2")
WinWaitActive(" 360安全卫士 5.3.0.1001 安装", "正在完成“360安全卫士”安装向导")
ControlCommand(" 360安全卫士 5.3.0.1001 安装", "运行 360安全卫士(&R)","Button4", "UnCheck")
ControlClick(" 360安全卫士 5.3.0.1001 安装", "了解 360安全卫士","Button5", "UnCheck")
FileDelete(@DesktopDir&"\360软件管家.lnk")
FileDelete(@DesktopDir&"\360保险箱.lnk")
FileDelete(@DesktopDir&"\修复360安全卫士.lnk")
Send("!F")

运行 360安全卫士(&R)这个可以去掉
了解 360安全卫士    这个怎么去不掉会运行
页: [1]
查看完整版本: 360自动安装麻烦高手帮我看一下