CreateTextFile 方法

創(chuàng)建指定文件并返回 TextStream 對象，該對象可用于讀或?qū)憚?chuàng)建的文件。

object.CreateTextFile(filename[, overwrite[, unicode]])

參數(shù)

object

必選項。應(yīng)為 FileSystemObject 或 Folder 對象的名稱。

filename

必選項。字符串表達式，指明要創(chuàng)建的文件。

overwrite

可選項。Boolean 值指明是否可以覆蓋現(xiàn)有文件。如果可覆蓋文件，該值為 True；如果不能覆蓋文件，則該值為 False 。如果省略該值，則不能覆蓋現(xiàn)有文件。

unicode

可選項。Boolean 值指明是否以 Unicode 或 ASCII 文件格式創(chuàng)建文件。如果以 Unicode 文件格式創(chuàng)建文件，則該值為 True；如果以 ASCII 文件格式創(chuàng)建文件，則該值為 False。如果省略此部分，則假定創(chuàng)建 ASCII 文件。

說明

以下代碼舉例說明如何使用 CreateTextFile 方法創(chuàng)建并打開文本文件：

Sub CreateAfile  Dim fso, MyFile  Set fso = CreateObject("Scripting.FileSystemObject")  Set MyFile = fso.CreateTextFile("c:/testfile.txt", True)  MyFile.WriteLine("這是一個測試。")  MyFile.CloseEnd Sub

對于 filename 已經(jīng)存在的文件，如果 overwrite 參數(shù)為 False，或未提供此參數(shù)時，則會出現(xiàn)錯誤。