鸿 网 互 联 www.68idc.cn

当前位置 : 服务器租用 > 服务器相关 > 批处理 > >

无良少年关机小程序

来源:互联网 作者:佚名 时间:2015-12-13 07:34
一个无良少年关机小程序,拷贝到txt里,修改后缀为vbe直接运行即可 无 on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""说我是猪,不说我是猪就一分钟关你机,
一个无良少年关机小程序,拷贝到txt里,修改后缀为vbe直接运行即可 <无>
on error resume next 
dim WSHshellA 
set WSHshellA = wscript.createobject("wscript.shell") 
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -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) + "哈哈哈哈,切糕思密达"
网友评论
<