CreateTextFile 方法創(chuàng)建指定文件并返回 TextStream 對(duì)象，該對(duì)象可用于讀或?qū)憚?chuàng)建的文件。 object.CreateTextFile(filename[, overwrite[, unicode]])
參數(shù)object 必選項(xiàng)。應(yīng)為 FileSystemObject 或 Folder 對(duì)象的名稱。 filename 必選項(xiàng)。字符串表達(dá)式，指明要?jiǎng)?chuàng)建的文件。 overwrite 可選項(xiàng)。Boolean 值指明是否可以覆蓋現(xiàn)有文件。如果可覆蓋文件，該值為 True；如果不能覆蓋文件，則該值為 False 。如果省略該值，則不能覆蓋現(xiàn)有文件。 unicode 可選項(xiàng)。Boolean 值指明是否以 Unicode 或 ASCII 文件格式創(chuàng)建文件。如果以 Unicode 文件格式創(chuàng)建文件，則該值為 True；如果以 ASCII 文件格式創(chuàng)建文件，則該值為 False。如果省略此部分，則假定創(chuàng)建 ASCII 文件。 說(shuō)明以下代碼舉例說(shuō)明如何使用 CreateTextFile 方法創(chuàng)建并打開(kāi)文本文件： Sub CreateAfile
Dim fso, MyFile
Set fso =CreateObject("Scripting.FileSystemObject")
Set MyFile =fso.CreateTextFile("c:\testfile.txt", True)
MyFile.WriteLine("這是一個(gè)測(cè)試。")
MyFile.CloseEnd Sub
對(duì)于 filename 已經(jīng)存在的文件，如果 overwrite 參數(shù)為 False，或未提供此參數(shù)時(shí)，則會(huì)出現(xiàn)錯(cuò)誤。 請(qǐng)參閱CreateFolder 方法 | OpenAsTextStream 方法 | OpenTextFile 方法 應(yīng)用于：FileSystemObject 對(duì)象 | Folder 對(duì)象 返回首頁(yè) |