오류가 발생하면 다음 단계로 진행하세요.
dim WSHshellA
WSHshellA = wscript createobject(. " wscript . shell ")
wsh shell a . run " cmd .exe/cshutdown-r-t 60-c " "돼지라고 부르지 않으면 1분 안에 전화기를 꺼버릴 것입니다. 그렇지 않으면 믿지 마세요. 시도해 보세요..." ", 0 , true
Dim
do while(a <& gt"나는 돼지입니다")
A = inputbox("Say I am a pig" , 닫지 말고 빨리 넘기고, ""나는 돼지다"라고 말하세요", "Say not to say", "Don't say", 80007000 )
msgbox chr(13)+chr(13)+chr(13 )+a,0," MsgBox "
링
msgbox CHR(13 )+CHR(13)+CHR(13)+ "더 일찍 말했으면 좋았을 텐데요."
Dim WSHshell
Set wsh shell = wscript . createobject(" wscript . shell ")
wsh 쉘 . 실행 " cmd . exe/c 종료 -a ", 0, true
msgbox CHR(13)+CHR(13)+CHR(13) +"하하하하하하하하하하"
위의 말을 노트에 복사해 보세요. 원하는 이름으로 저장하세요. 추가하는 것을 잊지 마세요. 뒤쪽으로 가십시오.