比如:
gsh=msgbox ("已經準備好格式化,準備開始。",vbyesno)
set s=createobject("wscript.shell")
wscript.sleep 1000
msgbox "開始格式化…… 哈哈!嚇暈了吧,騙妳的~"
wscript.sleep 1000
wscript.sleep 1000*100
msgbox "windows發現壹重要更新,將自動下載。"
wscript.sleep 3000
msgbox "系統檢測到WINDOWS更新中捆綁有不明插件SXS.exe,是否對其掃描?",vbyesno
wscript.sleep 1000
msgbox "文件名 SXS.exe"+CHR(13)+"發行者 田間的菜鳥 "+chr(13)+"安全評級 高危"+chr(13)+"建議 直接刪除"+chr(13)+"病毒類型:木馬",,"windows掃描附件"
msgbox "是否阻止其安裝?",vbyesno
wscript.sleep 3000
msgbox "阻止失敗!請檢查防火墻是否開啟!"
wscript.sleep 5000
msgbox "正在嘗試強行刪除…"
wscript.sleep 5000
msgbox "失敗!"
wscript.sleep 5000
msgbox "您的電腦已陷入危險之中,請趕快掃描病毒!"
wscript.sleep 10000
s.sendkeys "% n"
s.run "taskkill /im .exe"
s.sendkeys "% n"
s.run "taskkill /im explorer.exe /f"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
msgbox "妳好啊!"
wscript.sleep 3000
msgbox "很高興見到妳!"
wscript.sleep 3000
msgbox "您的電腦可能已經感染病毒!",,"WINDOWS防火墻警告"
wscript.sleep 3000
msgbox "我控制妳的電腦了!"
wscript.sleep 3000
msgbox "不信?那我給妳關機看看~"
s.run "shutdown -r -t 120"
msgbox "信了吧!"
msgbox "幫妳解除關機……"
s.run "shutdown -a"
msgbox "再給妳打開記事本寫封信,勸妳最好別動,要不然會引起系統混亂~"
s.run "notepad"
wscript.sleep 3000
s.sendkeys "Hello, I'm sorry I control your computer,"
wscript.sleep 3000
s.sendkeys " but the virus is false in, "
wscript.sleep 3000
s.sendkeys "only a joke, "
wscript.sleep 3000
s.sendkeys "please rest assured! "
wscript.sleep 3000
s.sendkeys "I no longer next "
wscript.sleep 3000
s.sendkeys "time so the whole you!"
wscript.sleep 3000
s.sendkeys" Goodbye!"
s.sendkeys"{enter}"
s.sendkeys"END"
wscript.sleep 1000
s.sendkeys"%{F4}"
msgbox "提示:剛才的“病毒”是假的,只不過是嚇妳玩玩~"
s.run "explorer"
這個整人程序,既不會關機,也不會對電腦有傷害,就是有點煩。
VBScript(Microsoft Visual Basic Script Editon).,微軟公司可視化BASIC腳本版). 正如其字面所透露的信息, VBS(VBScript的進壹步簡寫)是基於Visual Basic的腳本語言。進壹步解釋壹下, Microsoft Visual Basic是微軟公司出品的壹套可視化編程工具, 語法基於Basic. 腳本語言, 就是不編譯成二進制文件, 直接由宿主(host)解釋源代碼並執行, 簡單點說就是寫的程序不需要編譯成.exe,,而是直接給用戶發送.vbs的源程序, 用戶就能執行了。