• 欢迎访问奇跡の海网站,本站不上传任何资源,所有资源均来自于网络,欢迎加入奇跡の海~!奇跡の海-WordPress QQ群
  • 本站下载资源为网络上收集整理而来,并且以计算机技术研究交流为目的,版权归原作者所有,仅供大家参考,学习,不存在任何商业目的与商业用途.
  • 本站系统镜像均来自于官方原版,ed2k可视为P2P下载链接。所有操作系统默认均为试用版,如有正版密钥可以有效激活,本站不提供任何激活和相关服务。

AutoIt3(au3)源码-AutoRun.inf病毒清理与预防

AutoIT3 奇跡の海 2年前 (2017-11-03) 453次浏览 已收录 0个评论 扫描二维码

简介

AutoIt3(au3)源码-AutoRun.inf病毒清理与预防
用AU3写的“清理autorun.inf及病毒”的源码

源代码

#NoTrayIcon

Opt("TrayAutoPause", 0)
Opt("TrayMenuMode", 3)

TraySetState()

$AutoRun = TrayCreateItem("AutoRun.inf清理,预防")
TrayCreateItem("")
$exititem = TrayCreateItem("退出")

While 1

$msg = TrayGetMsg()
Select
Case $msg = 0
ContinueLoop
Case $msg = $AutoRun
$Flag = MsgBox(4, "AutoRun.inf清理,预防", "全盘清除AutoRun.inf,预防" & @LF & "可以吗?")
If $Flag = 6 Then
Dim $F = FileOpen(@WindowsDir & "\temp\auto.bat", 2)
TrayTip("", "正在清理AutoRun.inf...", 1)
FileWriteLine($F, 'For %%a In (c d e f g h i j k l m n o p q r s t u v w x y z) Do Del /a /f /q %%a:\autorun.inf>nul 2>nul & echo Y|cacls "%%a:\autorun.inf" /T /C /P everyone:F>nul 2>nul & rd /s /q %%a:\autorun.inf\ >nul 2>nul & md "%%a:\autorun.inf\autorun预防...\">nul 2>nul & attrib +s +h +r %%a:\autorun.inf >nul 2>nul& echo Y|cacls "%%a:\autorun.inf" /T /C /P everyone:N >nul 2>nul ')
FileClose($F)
RunWait(@ComSpec & " /c call " & @WindowsDir & "\temp\auto.bat", @ScriptDir, @SW_HIDE)
TrayTip("", "", 0)
MsgBox(0, "", "AutoRun.inf病毒清理(预防)完毕!")
Else
ContinueLoop
EndIf
Case $msg = $exititem
FileDelete(@WindowsDir & "\temp\auto.bat")
Exit
EndSelect

WEnd

版权声明:本站所有文章和资源使用CC BY-NC-SA 4.0协议授权发布 , 转载应当以相同方式注明文章来自“SeaOMC.COM->AutoIt3(au3)源码-AutoRun.inf病毒清理与预防!在下边可以分享本文哦!
喜欢 (0)
[]
分享 (0)
奇跡の海
关于作者:
一个WordPress菜鸟!
发表我的评论
取消评论

表情 贴图 加粗 删除线 居中 斜体 签到

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址