前幾篇介紹了檔案的複製、移動及刪除
那檔案當然是不會只有以上這些功能
尚還有很多的功能運用..
一、建立純文字檔案(CreateTextFile)

Option Explicit
Private FSO
Private FileName
Set FSO = CreateObject("Scripting.FileSystemObject")
FileName = FSO.GetBaseName(Wscript.ScriptFullName) & ".txt"
FSO.CreateTextFile FileName
Set FSO = Nothing

二、讀在純文字檔的全部內容(ReadAll)

Option Explicit

Private FSO
Private FileName
Private Buffer
Set FSO = CreateObject("Scripting.FileSystemObject")
FileName = FSO.BuildPath(FSO.GetFolder("."), "CreateTextFile.txt")
With FSO.OpenTextFile(FileName)
	Buffer = .ReadAll
	.Close
End With
Wscript.Echo Buffer
Set FSO = Nothing

將以上兩個範例做成「CreateTextFile.vbs」及「ReadTextFile.vbs」
利用第一個範例，執行後，可在同一個資料夾新增一個「CreatTextFile.txt」檔案

開啟「CreateTextFile.txt」，在內容輸入一些文字，存檔
然後，我們再利用第二個範例，執行後，即可得到「CreateTextFile.txt」檔案的內容

在新增純文字檔之後，一定要在純文字檔裡輸入文字
要不在第二個範例讀取時會出現錯誤..

提供給有需要的人...