VBS程式碼--很噁心的整人效果
----我們會經常遇到一些無聊的檔案,一旦我們開啟它就會出現各種煩人的新視窗,今天來看的是VBS指令碼----
一:VBS簡介
VBS是基於Visual Basic的指令碼語言。VBS的全稱是:Microsoft Visual Basic Script Editon。(微軟公司視覺化BASIC指令碼版)。其語言類似Visual Basic(VB),VBS是微軟的WSH指令碼的一種,WSH是是Windows指令碼宿主,是一個指令碼直譯器,支援vbs,js,wsh三種格式的指令碼。 簡單瞭解一下,計算機語言分為編譯語言和解釋語言,指令碼語言屬於解釋語言。VBS指令碼是有ASCII碼組成。編寫VBS指令碼沒有什麼特定要求,只要有系統帶了WSH環境就可以,從WIN98就開始支援了。由於這個指令碼涉及到關機操作,所以安全管家會提醒操作,另外這個指令碼還可以開啟一個網址,後面的操作沒有繼續操作,大家可以嘗試一下完全進行的過程,那就繼續看如何實現吧。。。
三:程式的編輯
我知道菜鳥現在最關心的就是用什麼工具來開發VBS程式了, 答案是:記事本(Notepad),我不是開玩笑, 其實任何一種文字編輯器都可以用來開發VBS, 只不過記事本是由系統自帶的, 比較好找而已. 儘管如此, 我還是建議你去下載一個專業的文字編輯器, 因為這些工具可以提供 "語法高亮"等功能, 更加方便開發, OK, 我們先來寫一個VBScript程式來實現上述的效果圖;2.
我們來開始編寫第一個程式,我們就以上述程式為例來學習vbs程式設計。
在記事本下面輸入以下程式碼:
set ws=createobject("wscript.shell")
call shutdown(1)
do while a<>"我是豬"
a=inputbox("快在下面的框框裡輸入我是豬,否則後果自負,快輸""我是豬"" ","輸不輸","")
loop
call shutdown(2)
msgbox "早說就行了嘛",4096+64
msgbox"再輸一遍我是豬!",4096+64
msgbox"我是豬!",4096+64
MsgBox"最後一次!",4096+64
MsgBox"如果你很快的點過去,不看的話",4096+64
MsgBox"我就要你踩我空間的!哼!",4096+64
MsgBox"從前有座山!",4096+64
MsgBox"山裡有個廟.",4096+64
MsgBox"廟裡有個老和尚在講故事.",4096+64
ws.run"iexplore.exe http://www.baidu.com"
msgbox"哎呀累了!數綿羊哄我睡覺",4096+64
for i=1 to 100
MsgBox i&"只綿羊",4096+64
next
msgbox"哎呀我困了,這次就饒過你吧,下次注意哦!",4096+64
msgbox"最後問個問題,我是不是大好人!",4096+64
if inputbox("是不是","請選擇","是")<>"是" then
call shutdown(1)
end if
sub shutdown(s)
select case s
case 1
ws.run"cmd.exe /c shutdown -r -t 60 -c",0
case 2
ws.run"cmd.exe /c shutdown -a",0
end select
end sub
如圖所示:
(其中的URL地址可以隨意寫入)
3.然後點選檔案選單,在另存為對話方塊下面輸入字尾為.vbs的檔名就可以。這樣你的第一個程式就完成了。
4.之後只要雙擊圖示就會出現我們想要的效果,小夥伴們趕緊試一試吧!!
注:在有點win7電腦上有的記事本儲存後不能更改字尾為.vbs的檔案(如圖),這個時候我們需要在記事本里選擇另存為,輸入檔名為"***.vbs"(一定要加雙引號),才能夠儲存為vbs檔案。
經驗內容僅供參考,如果您需解決具體問題(尤其法律、醫學等領域),建議您詳細諮詢相關領域專業人士