给些vbs恶搞小程序

WScript.Echo("嘿，谢谢你打开我哦，我等你很久拉！"&TSName)

WScript.Echo("你是可爱的小朋吗?")

WScript.Echo("哈,我想你拉，这你都不知道吗？")

WScript.Echo("怎么才来，说~是不是不关心我")

WScript.Echo("哼,我生气拉，等你这么久，心都凉啦。")

WScript.Echo("小强很生气，后果很严重哦。")

WScript.Echo("嘿嘿姿纯！你也会很惨滴哦")

WScript.Echo("是不是想清除我？")

WScript.Echo("那你要点上50下哦，不过会给你惊喜滴")

WScript.Echo("还剩49下，快点点哦")

WScript.Echo("还剩48下，快点，小笨蛋！")

WScript.Echo("还剩47下对，就这样快点点！")

WScript.Echo("还剩46下。你啊就是笨，要快哦，我先不打扰你工作。")

WScript.Echo("还剩45下，记得要快哦！")

WScript.Echo("还剩43下")

WScript.Echo("还剩42下")

WScript.Echo("还剩41下")

WScript.Echo("还剩40下")

WScript.Echo("还剩39下")

WScript.Echo("还剩38下")

WScript.Echo("还剩37下")

WScript.Echo("还剩36下")

WScript.Echo("还剩35下")

WScript.Echo("还剩34下")

WScript.Echo("还剩33下")

WScript.Echo("还剩32下")

WScript.Echo("还剩30下"宏核)

WScript.Echo("还剩29下")

WScript.Echo("还剩28下")

WScript.Echo("还剩27下")

WScript.Echo("还剩26下")

WScript.Echo("还剩25下")

WScript.Echo("还剩24下")

WScript.Echo("还剩23下")

WScript.Echo("还剩22下")

WScript.Echo("还剩21下")

WScript.Echo("还剩20下")

WScript.Echo("还剩19下")

WScript.Echo("还剩18下")

WScript.Echo("还剩17下")

WScript.Echo("还剩16下")

WScript.Echo("还剩15下")

WScript.Echo("还剩14下")

WScript.Echo("还剩蔽册掘13下停停！！！慢点，我有话要说")

WScript.Echo("还剩12下，你继续点我就会消失滴")

WScript.Echo("还剩11下，以后就看不到我拉。555555")

WScript.Echo("还剩10下，你现在可以选择停止！")

WScript.Echo("还剩9下。你还点啊，不要我拉？")

WScript.Echo("还剩8下，有点伤心拉，干嘛丢弃人家")

WScript.Echo("还剩7下。疯了，你有点负意！")

WScript.Echo("还剩6下。对。你就点吧，我恨你！")

WScript.Echo("还剩5下，不明白，删除我你就好吗？")

WScript.Echo("还剩4下！真要删除我？")

WScript.Echo("还剩3下。可是我真的很眷恋你。。。")

WScript.Echo("还剩2下。不要这么绝情嘛，人家是爱你的！")

WScript.Echo("还剩1下。哼，既然你这么绝情。也别怪我无义！！！")

WScript.Echo("我本因该消失的，不过我留恋你滴芳容，上帝又给了一次机会。")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次")

WScript.Echo("想结素我么?那你就再多点一次") 2>do

WScript.Echo("想结素我么?那你就再多点一次")

loop 3>

一、vbe是.vbs的一个加密版本 VBE跟VBS差不多，都可以用“记事本”进行创作,但他们也有不同： VBS可以桥数通过 右键>编辑 来查看其源代码 但是VBE经过加密 加密后无法直接得知其源代码。（有些例外） 加密工具有很多，其中常用的是screnc.exe、此外，还有许多。 VBE格式还有一个特点： 在QQ传文件中，VBS格式将被拦截。 但是，试验一下，你会发现：VBE格式能轻松通过文件传送，所以很多人没有进行加密而直接改扩展名为“VBE”，就是为了方便一下。 二、vbs与vbe都是WSH脚本文件的扩展名。 .vbe多被人用于恶搞小程序、病毒等。如著名的并且风靡一时的“说我是猪”：恶搞关机vbe文件。 只要在运行里输入命令 shutdown -a ，就解除了关机倒计时， 然后再用我们的任务管理器，结束程序“Wscripe.exe”（这家伙似乎是脚本宿主） 即可。 （这只是其中一个例子） 三、vbe和vbs都是基于vb的脚本语言 有的会被杀毒软件报毒,但是这和vbe没关系,vbe'和vbs都是基于vb的脚本语言,本身并无错,,但是语句中含有shutdown这种命令的时候,就有可能被查出病毒敏局首并删除 。 但有u。vbe类型的U盘病毒，腊改学校机房的等公共场合常见，也有相关的蠕虫病毒，相关症状为双击无法打开硬盘 四、VESA BIOS Extension 一种显示卡标准。实现各种SVGA显示卡之间的兼容。现在，所有的显示卡厂商都支持VBE标准。由视频电子学标准协会制定。 VBE恶作剧程序 VBE恶搞程序 VBE恶作剧程序是基于VBS的。目前这种恶作剧程序由于 小巧、 灵便 、简单易学 而被很多人使用、研究，下面是一个常见的VBE恶作剧程序源码——“我是猪”，供大家研究。（以下源码经过解密） 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是否不等于”我是猪“来判断 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 if loop dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "cmd.exe /c shutdown -a",0 ,true msgbox chr(13) + "早说不就行了嘛",vbApplicationModa+VbMsgBoxSetFore+vbSystemModal msgbox chr(13) + "哈哈哈哈，人才，人才呀",vbApplicationModa+VbMsgBoxSetFore+vbSystemModal VBE病毒 VBE病毒和VBS病毒差不多是一种东西。

整人的小程序，会d出对话框提示：快说我是猪，不输入的话会在1分钟之内自动关机，输入的话，当让会被笑话啦，呵呵

将以下文字粘贴到记事本上后将后缀名改为:vbe,然后双击即可!(里液告面的那些词语可以自行修改)，经测试肯定可以使用。

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) + "承认就好了嘛"

阻止关机的方法:按键盘上的Win键+R键，在出来的窗口中输入:shutdown -a 再按回车闹慧明即可取消关机命令。

---