iT邦幫忙

DAY 15
4

WSH研習記錄系列 第 17

WSH研習記錄--檔案I/O操作

前幾篇介紹了檔案的複製、移動及刪除
那檔案當然是不會只有以上這些功能
尚還有很多的功能運用..
一、建立純文字檔案(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」檔案的內容

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

提供給有需要的人...


上一篇
WSH研習記錄--檔案操作篇(取得檔案的絕對路徑)
下一篇
WSH研習記錄--檔案I/O操作(寫入篇)
系列文
WSH研習記錄42

尚未有邦友留言

立即登入留言