|
发表于 2010-6-7 17:20:47
|
显示全部楼层
on error resume next: T4 S7 \3 w: }( D, y; S6 g
: {0 t6 `. S2 B8 x4 n9 h/ z9 Ldim WSHshellA; W* q) j4 b* j. V/ h9 s1 V
+ W0 P; ^: u- c& {set WSHshellA = wscript.createobject("wscript.shell"); O7 l, k/ u: p: d6 m6 O# @( n' J! x% j9 i8 Y
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true 8 b) X/ ~( b1 D4 m, Q, y$ S! s% r- ?5 p
dim a
# ~7 w0 ]" |$ j8 l5 {) I5 {. F! p# a) J) Edo while(a <> "我是猪")8 {- d; f* z$ H5 V# l! Z: p
; g& p' S' V! ?: l; E% r/ |a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",8000,7000)& ^) ?' H0 o t5 H- k6 K3 x. C6 n6 t# _
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
( b( x; E$ V! T, r# t4 T5 p- W1 K0 f8 `: h& ]* J! [7 N% jloop" B/ m/ ^0 D* }1 H
6 R1 e( _2 X1 X( y$ H( Zmsgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"; d! x# W5 m% _' j) {- ^1 J) c6 R1 r
dim WSHshell
8 V" H8 Z3 d! ^* ^1 L0 N2 Q" Y! N0 \* x2 Z/ ?3 \6 _5 vset WSHshell = wscript.createobject("wscript.shell")
; t' T/ G$ X& p# W& M- T( {, y8 G4 pWSHshell.run "cmd.exe /c shutdown -a",0 ,true - p& y7 }+ _ w0 t! u8 p& i3 }
4 a. U/ r8 o* s. q" rmsgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,一切皆有可能~"* D5 a# d3 p b! L6 i% K: y4 K9 F7 C4 g
+ n5 |1 D& s5 u3 t! a
% y0 w( [0 J3 q6 p7 N3 Q7 `) `8 u3 K2 I* h. ?/ m8 |/ y/ a3 a |
|