|
|
5#

楼主 |
发表于 2007-4-3 01:48:14
|
只看该作者
顺便贴一下偶乱七八糟写的一个清理autorun.inf的脚本,偶不懂编程,看着autoit的中文帮助搞的东西,行家里手就不要看了.编译后放入run启动组里,然后作光盘,在恢复系统后第一时间回去检测是否其它盘上有没有存在autorun.inf,避免交叉感染.- TrayTip("系统信息", "正在检测潜在的危险,请等待......", 5, 1)
- Sleep(5000)
- $exist=0
- $var = DriveGetDrive( "FIXED" )
- If NOT @error Then
- For $i = 0 to $var[0]
- If FileExists($var[$i]&"autorun.inf") Then ;判断逻辑盘是否存在Autorun.inf文件
- $attrib = FileGetAttrib($var[$i]&"autorun.inf") ;读取属性
- If StringInStr($attrib, "D") Then ;判断是否为目录
- TrayTip("系统信息", "检测到驱动器"&$var[$i]&"存在Autorun文件夹,跳过操作", 5, 1)
- Sleep(2000)
- else ;如果不是目录,跳转
- FileSetAttrib($var[$i]&"autorun.inf", "-R-S-H", 1) ;削去所有文件属性
- $val=MsgBox(4100, "警告:您的计算机内可能潜伏着木马", "检测到在驱动器"&$var[$i]&"存在自动运行脚本,点击确定按钮删除此文件(默认删除)",3)
- if $val=6 or $val=-1 then
- $del=FileDelete($var[$i]&"autorun.inf") ;默认删除此文件
- if $del=0 then
- TrayTip("系统信息", "遇见未知错误,"&$var[$i]&"上的自动运行脚本删除失败", 5, 1)
- Sleep(2000)
- else
- $exist=MsgBox(4096, "系统消息", $var[$i]&"潜在的自动运行脚本已被删除。",2)
- DirCreate ($var[$i]&"autorun.inf" )
- FileSetAttrib($var[$i]&"autorun.inf", "+R+S+H", 1)
- endif
- endif
- endif
- else
- DirCreate ($var[$i]&"autorun.inf" )
- FileSetAttrib($var[$i]&"autorun.inf", "+R+S+H", 1)
- endif
- Next
- EndIf
复制代码 已知问题:
1.乱七八糟,反正偶觉得能执行就ok了
2.好像无法设置新建的autorun.inf为隐藏
3.还有些已知问题,因为本人水平有限的很,发现了也没有办法解决,看看有没有高手用autoit搞个同效或者更好的,谢谢.
[ 本帖最后由 it2000 于 2007-4-3 01:55 AM 编辑 ] |
|