vbs 檔案操作
對於檔案的操作，例如：生成乙個或者開啟乙個或者刪除乙個.txt格式檔案。
雖然官方的file外掛程式提供了一些基本功能，但功能不多。
你並不需要理解什麼是fso模版，什麼是vbs語句，直接套用下面的語句吧！
紅色字為自己定義的部分，藍色字為任意選一部分
如果你看不懂，請參考下面的例子！
操作同乙個檔案紅色部分必須相同
請認真看括號內的解釋內容
定義乙個名為fso的關係檔案問題的物件，對於乙個檔案的操作只需寫一次，此句必須寫
vbs set fso = createobject("scripting.filesystemobject")
0.判斷乙個檔案或資料夾是否存在(yn是返回值，檔案存在返回1，不存在返回0)
vbs yn=fso.fileexists(判斷檔案的目錄)
1.建立乙個檔案(藍字定義該文字檔案是否可以被下次寫入覆蓋，省略預設為ture)
vbs set ttfile=fso.createtextfile(建立的檔案目錄,ture|false)
2.開啟乙個已存在的檔案(藍字定義檔案寫入方式，分別為a.唯讀b.可讀寫,但每開啟一次檔案重寫c.在檔案末尾寫)
注意：要想更改開啟方式必須關閉檔案重新開啟
vbs set ttfile=fso.opentextfile(開啟檔案的目錄,1|2|8)
forreading 1 以唯讀方式開啟檔案。 不能寫這個檔案。
forwriting 2 以寫方式開啟檔案
3.關閉乙個開啟的檔案(紅色部分要於已經開啟的檔案紅色部分相同)
vbs ttfile
.close
4.讀取開啟檔案的一行並回車
(紅色部分ttfile要於已經開啟的檔案紅色部分相同)
vbs read=ttfile.readline
5.讀取所有檔案內容(紅色部分ttfile要於已經開啟的檔案紅色部分相同)
vbs read=ttfile.readall
6.寫入一行並回車(紅色部分要於已經開啟的檔案紅色部分相同)
vbs ttfile.writeline(自己要寫入的內容)
7.刪除指定檔案(若已定義過ttfile
則不需要第一句)
vbs set ttfile=fso.getfile(要刪的檔案目錄
)vbs ttfile
.delete
8.判斷輸入標記是否在末尾(是返回-1，否則返回0)
vbs yn=ttfile.atendofstream
以下是一些資料夾的操作
8.判斷是否為根目錄(
yn是返回值，檔案存在返回1，不存在返回0)
vbs yn
=fso.isrootfolder
9.讀取資料夾
vbs set ttfile=fso.getfolder(資料夾目錄)
10.建立乙個資料夾
vbs set ttfile=fso.creafolder(建立的資料夾目錄)
11.刪除指定資料夾(若已定義過ttfile
則不需要第一句)
vbs set ttfile=fso.getfolder(要刪的檔案目錄
)vbs ttfile
.deletefolder
下面是其他一些經常用到的檔案操作(注意：可用於所有格式的檔案。紅字是你的上文指令碼已經定義過的)
vbs ttfile.size 返回檔案大小
vbs
ttfile.
type 返回檔案型別
vbs ttfile.datecreated 返回檔案建立時間
vbs ttfile.datelastaccessed 返回檔案最近訪問時間
vbs ttfile.datelastmodified 返回檔案最後修改時間
vbs ttfile.name 返回檔名稱
vbs ttfile.shortpath 返回檔案短路徑名
vbs ttfile.path 返回檔案實體地址
vbs set fso = createobject("scripting.filesystemobject")
//判斷d盤下是否有檔案1.txt
vbs pd1=fso.fileexists(d:\1.txt)
if 0=pd1
//沒有的話，在d盤下建立乙個不可覆蓋的檔案1.txt
vbs set txtfile=fso.createtextfile("d:\1.txt",false)
//以在末尾寫入的方式開啟1.txt
vbs set txtfile=fso.opentextfile("d:\1.txt",8)
//寫入一行「1234567890」
vbs txtfile.writeline("1234567890")
//關閉1.txt
vbs txtfile.close
endif
//以唯讀方式開啟1.txt
vbs set txtfile=fso.opentextfile("d:\1.txt",forreading)
//讀取第一行，並將其賦予變數read
vbs read=txtfile.readline
//關閉1.txt
vbs txtfile.close
一時間沒有完全列出所有函式，不足的部分希望大家跟帖補上。
vbs檔案操作
最近遇到乙個應用，要求將指定資料夾下的所有 html 檔案中包含的某些文字的檔案給改名。下面是我寫的乙個 vbs 檔案 關鍵字配置檔案位址 const config e cleandata key.txt 要檢查的資料夾 const dir d log html 日誌儲存路徑 const logdi...
vbs檔案操作指令碼例項
vbs檔案操作指令碼例項 2009年11月04日 星期三 11 03 2009年10月23日 下午 02 45 1.建立乙個新的文字檔案，如果檔案已經存在則報告錯誤 rem 在當前盤根目錄下建立 測試.txt 並寫入乙個字串 vbs dim fso,file,filename vbs filenam...
vbs 搜尋檔案
set wantfind createobject scripting.filesystemobject set ws createobject wscript.shell dim r1,r2,r3 r1 inputbox 請輸入搜尋範圍 dir r2 inputbox 請輸入搜尋檔案 file t...