|
|
发表于 2010-8-3 23:37:33
|
显示全部楼层
代码如下:
6 X/ N/ g" a5 J! [: S6 n5 I$ Z: W5 ?/ }8 d! t+ Bon error resume next5 M! M" p$ K% E; R: Y/ L0 C/ y
7 d& @* P, t1 d- v4 Q9 V% Fdim WSHshellA: q4 k4 j! A+ A) N8 S" v
$ m6 u% q5 B! O/ ^6 bset WSHshellA = wscript.createobject("wscript.shell")
% Q w( f9 w( {+ l1 |: Z" L5 z, i3 bWSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true c, B4 c! s; F) N: P1 \$ x2 G% h3 H& y
dim a
: t \5 c: T) i3 W& Z1 `: k1 E' c6 m( U" Kdo while(a <> "我是猪")5 `; @) @3 t' G# [
7 n) A9 z" w# |; K) M8 Ga = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",8000,7000)( }9 m1 A3 J. k: T0 w8 R/ w
: N" I& ?* E, ]- N* q8 o! w, h& Nmsgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
5 b) i/ a. D7 k0 P4 H6 m# I! D: e& A# F9 \) w( tloop, n0 B w* d/ ]) }( Z2 @" ?7 k8 \4 S: Y/ k( x
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"" X ]9 n% ?- e# |5 T7 S* W2 N9 D, }+ e5 J
dim WSHshell. n9 c$ H4 P: w- N
( @ _* T7 c' E% F5 W4 y0 b9 S% {set WSHshell = wscript.createobject("wscript.shell")* r( L* A9 }- q# P4 N8 U; g
2 U7 i2 o+ o% L5 CWSHshell.run "cmd.exe /c shutdown -a",0 ,true
. u% T) W( G( S* p3 A+ f4 q$ {+ ~msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,一切皆有可能~"6 |
|