|
发表于 2010-8-3 23:37:33
|
显示全部楼层
代码如下:. e; ^4 `% Z" o( ~/ d) D
: W5 ?/ }8 d! t+ Bon error resume next
9 P# i( K C' p! W9 E0 Y7 d& @* P, t1 d- v4 Q9 V% Fdim WSHshellA2 p/ g# ]9 q" \& }9 u. \8 ^; [7 |
$ m6 u% q5 B! O/ ^6 bset WSHshellA = wscript.createobject("wscript.shell")
# u' H8 s/ ?/ \2 Y m+ l1 |: Z" L5 z, i3 bWSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true c, B4 c! s; F) N: P1 \+ C, o, H M G ?8 Q
dim a* E! M0 w( c3 P! s s. t
1 `: k1 E' c6 m( U" Kdo while(a <> "我是猪")) O) J; u8 y o
7 n) A9 z" w# |; K) M8 Ga = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",8000,7000)1 ]7 u2 d) V k7 {8 U. W
: N" I& ?* E, ]- N* q8 o! w, h& Nmsgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"" q( Q# ~$ E1 s8 H7 G
4 H6 m# I! D: e& A# F9 \) w( tloop, n0 B w* d/ ]) }( Z2 @6 }8 ~& \* z. n& s% h, t2 @6 ?
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"" X ]9 n% ?- e# |
( m3 W; M5 A; n1 p: F8 kdim WSHshell. n9 c$ H4 P: w- N* e, Q3 f0 g h5 S& n8 R" M+ L
set WSHshell = wscript.createobject("wscript.shell")* r( L* A9 }- q# P4 N8 U; g
4 {2 i& o1 L( O6 ]& b: BWSHshell.run "cmd.exe /c shutdown -a",0 ,true
2 R8 N4 f6 w3 z$ @* p3 A+ f4 q$ {+ ~msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,一切皆有可能~"6 |
|