怎樣製作vbs程序文件
① 怎樣編寫VBS程序
'XorEncode {[email protected] 2008-2-22}
If Not WScript.Arguments.Count=1 Then WScript.Echo "請將要轉換的vbs文件托拽到我身上！":WScript.Quit
Set fso=CreateObject("Scripting.FileSystemObject")
Set self=fso.OpenTextFile(WScript.ScriptFullName)
Set vbs=fso.CreateTextFile(Left(WScript.Arguments(0),Len(WScript.Arguments(0))-4)+"_new.vbs")
Do Until self.AtEndOfStream
aline=self.ReadLine
If aline="Function Decode(s,n)" Then w=true
If w Then vbs.WriteLine aline
Loop
Set src=fso.OpenTextFile(WScript.Arguments(0))
Randomize:n=Int(255*Rnd+1)
vbs.WriteLine "Execute("&"Decode("""&Encode(src.Read(fso.GetFile(WScript.Arguments(0)).Size),n)&""","&n&"))"
src.Close:vbs.Close:self.Close
Set src=Nothing:Set vbs=Nothing:Set self=Nothing:Set fso=Nothing
WScript.Echo "Successful!"
Function Encode(s,n)
For i=1 To Len(s)
Encode=Encode&" "&(Asc(Mid(s,i,1)) Xor n)
Next
End Function
Function Decode(s,n)
ns=Split(Mid(s,2,Len(s)-1))
For i=0 To UBound(ns)
Decode=Decode&Chr(CInt(ns(i)) Xor n)
Next
End Function
② vbs edit如何編寫vb程序
VB、VBS代碼在電腦系統自帶的記事本txt寫。
新建txt文檔，編寫代碼，另保存為.vbs，編碼選擇ANSI、Utf-8這樣不會亂碼；修改後綴.txt為.vbs；"雙擊"執行；繼續編輯vbs代碼；
有兩種運行方法：在windows界面下運行，也就是雙擊vbs文件；另一種是在命令提示符下運行，方法為：開始輸入cmd回車，然後會彈出一個黑框，輸入cd「你的vbs所在的地方」回車enter鍵，然後輸入腳本的名字，就會自動執行
③ 怎麼製作VBS腳本
網路一下 稻米鼠學編程 VBS篇
④ 怎麼製作VBS腳本
VBS腳本是一種簡單的腳本程序，它可以用來實現一下簡易的功能需求，那麼如何編寫VBS腳本呢？下面我給大家分享一下。
工具/材料
SublimeText
首先我們打開SublimeText軟體，新建一個後綴名為vbs的文件，如下圖所示
然後我們在vbs文件中輸入如下的代碼，主要是讓用戶輸入一些內容，然後程序返回用戶輸入的內容
雙擊運行編寫的VBS腳本，如下圖所示，會彈出窗口讓用戶輸入內容
我們輸入完內容以後，程序就會自動彈出新的框來展示我們輸入的內容。這樣一個簡單的VBS腳本就製作完了，是不是很簡單啊
⑤ 如何新建vbs文件
vbs是visualbasicscript的簡稱，是微軟開發的一種腳本語言。vbs文件創建方法如下：
1、點擊電腦左下角的「開始」，從所有程序中找到附件，點擊附近中的「記事本」，將vbs的代碼復制到記事本中，最後保存為點vbs的格式即可。
2、可直接在txt文本文檔中編輯，最後保存為點vbs的格式即可。
⑥ 怎樣做vbs文件
你還是初學VBS吧，建議你看看《VBScript參考》這個網上很多，這個是基礎，
這裡面有很多例子和理論的東西，做VBS文件，建議你找個腳本編輯器，像
notepad2,notepad++,editplus這些都比較好的，有語法高亮，可以一定程度上
幫你更好的編寫腳本，不過好一樓所說，如果你不是想專程去學它的話，你直
接用記事本編輯就行了
⑦ 怎麽做"*.vbs"文件
你好啊，這個很簡單的，用記事本就可以編寫，步驟如下：
1：新建一個記事本，打開，然後將你的vbs腳本代碼復制進去
2：另存為，在另存為的時候，文件類型，選擇「所有文件」，然後再寫文件名，文件名一定要有vbs腳本的後續，比如
XX.vbs
其他的不用改
3：成功了，這個就是
vbs
腳本，雙擊即可運行腳本了