论坛 › 『 提问交流 』 › 360漏洞自动修复脚本

zzfbz 发表于 2009-5-1 19:15:20

360漏洞自动修复脚本

;采用360漏洞修复绿色单文件（带库自动更新），做了一个自动修复脚本，感觉不怎么完善，请大家指教
FileInstall ("360漏洞修复.exe", @ScriptDir&"\360漏洞修复.exe", 1 )
run(@ScriptDir&'\360漏洞修复.exe',@ScriptDir)
sleep(5000)
WinWaitActive("360漏洞修复","修复选中漏洞")
ControlClick("360漏洞修复","修复选中漏洞","Button4")
ControlClick("360漏洞修复","修复选中漏洞","Button5")
WinWaitActive("360漏洞修复","确定")
ControlClick("360漏洞修复","确定","Button2")
if WinExists("360漏洞修复","稍后重启") then
WinWaitActive("360漏洞修复","稍后重启")
ControlClick("360漏洞修复","稍后重启","Button3")
endif
sleep(3000)
if WinExists("360漏洞修复") then winclose("360漏洞修复")
DirRemove(@ScriptDir&'\hotfix',1)
For $i = 1 to 20
      sleep(500)
      if FileDelete (@ScriptDir&'\hotfix')=1 then ExitLoop
        Next
FileDelete(@ScriptDir&"\360漏洞修复.exe")
For $i = 1 to 20
      sleep(500)
      if FileDelete ( @ScriptDir&'360漏洞修复.exe' )=1 then ExitLoop
Next
;附360漏洞修复绿色单文件下载地址
;http://freeskycd.cn/bbs/forum.php?mod=viewthread&tid=13854&highlight=%C2%A9%B6%B4%D0%DE%B8%B4

zzfbz 发表于 2009-5-3 01:26:41

大家给点意见和建议啊，想学习啊

lzl88123 发表于 2009-5-3 21:53:16

谢谢，学习下啊，

bossqian 发表于 2009-5-12 11:47:01

不是很看的懂

bossqian 发表于 2009-5-12 12:14:53

这个东西要顶的

w369610324 发表于 2009-5-13 14:29:57

这个   适合大面积打补丁例如有盘的网吧

huangguolian 发表于 2009-7-6 12:05:55

我用了你的代码 很好啊！

xytjc 发表于 2009-7-21 17:56:11

LLLOOOOOOOOOOOOK

Myleaf 发表于 2009-11-11 11:05:57

这么好的东西不定吗？望出个最新版的，

kf354rut 发表于 2009-11-11 22:09:19

值得一试值得一试

karlpopper 发表于 2009-11-12 02:13:53

不错啊 值得看看

lc_lichuan 发表于 2009-11-12 08:09:10

本帖最后由 lc_lichuan 于 2009-11-12 08:10 编辑

很不错的代码哟，支持个
不过提醒楼主链接失效了！

查看完整版本: 360漏洞自动修复脚本