superflq 发表于 2008-10-24 22:21:23

找为看得懂批处理的大哥，帮下忙

for %%i 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 (
if exist %%i: (
%%i:
cd\
@del /f /q /s acaddoc.lsp
@del /f /q /s acad.lsp
@del /f /q /s acad.fas
@del /f /q /s lcm.fas
))
@ECHO.
del /f /q %windir%\system32\dwgrun.bat
REG DELETE HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run   dwgrun /f


哪位大哥看的到批处理，帮我把上面这个杀CAD病毒的批处理，弄成AU3的语句，小弟感激不尽

[ 本帖最后由 superflq 于 2008-10-25 11:25 编辑 ]

ceoguang 发表于 2008-10-24 23:45:08

检测各个盘符下的
acaddoc.lsp
acad.lsp
acad.fas
lcm.fas
删除
%windir%\system32\dwgrun.bat
删除注册表
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
的dwgrun.
相当简单

superflq 发表于 2008-10-25 08:33:58

谢谢:face (29):

superflq 发表于 2008-10-25 08:38:57

检测各个盘符下的
acaddoc.lsp
acad.lsp
acad.fas
lcm.fas

这个代码怎么写，这些文件不一定都是在根目录下面的

ceoguang 发表于 2008-10-25 10:36:25

呵呵,水平有限,还是调用CMD的DEL /S来删除实在点吧.FileFindFirstFile搜索不了子目录,枚举的时间更长.

bob 发表于 2008-10-25 11:17:08

有UDF来实现列出目录下所有文件或文件夹,包括子文件夹，但效率如何，还未测试
http://www.1msoft.com/column/UDF-hanshu/FileListToArray.html

superflq 发表于 2008-10-25 11:24:36

谢谢BOB，下来试试看效率

番茄 发表于 2008-10-25 11:35:23


$var = DriveGetDrive( "FIXED" )
        If Not @error Then
           For $i = 1 to $var
                        RunWait(@ComSpec & ' /c del /f /q /a /s '&$var[$i]&'\acaddoc.lsp','',@SW_HIDE)
                        RunWait(@ComSpec & ' /c del /f /q /a /s '&$var[$i]&'\acad.lsp','',@SW_HIDE)
                        RunWait(@ComSpec & ' /c del /f /q /a /s '&$var[$i]&'\acad.fas','',@SW_HIDE)
                        RunWait(@ComSpec & ' /c del /f /q /a /s '&$var[$i]&'\lcm.fas','',@SW_HIDE)
RegDelete('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run   dwgrun /f')


[ 本帖最后由 番茄 于 2008-10-25 11:41 编辑 ]

bob 发表于 2008-10-25 11:40:49

呵呵
番茄的代码很简洁高效了

superflq 发表于 2008-10-26 16:10:30

非常感谢，学习了
页: [1]
查看完整版本: 找为看得懂批处理的大哥，帮下忙