打開(kāi)指定的文件并返回一個(gè) TextStream 對(duì)象，可以通過(guò)這個(gè)對(duì)象對(duì)文件進(jìn)行讀、寫或追加。

object.OpenTextFile(filename[, iomode[, create[, format]]])

參數(shù)

object

必選項(xiàng)。object 應(yīng)為 FileSystemObject 的名稱。

filename

必選項(xiàng)。指明要打開(kāi)文件的字符串表達(dá)式。

iomode

可選項(xiàng)�？梢允侨齻�(gè)常數(shù)之一：ForReading 、 ForWriting 或 ForAppending 。

create

可選項(xiàng)。Boolean 值，指明當(dāng)指定的 filename 不存在時(shí)是否創(chuàng)建新文件。如果創(chuàng)建新文件則值為 True ，如果不創(chuàng)建則為 False 。如果忽略，則不創(chuàng)建新文件。

format

可選項(xiàng)。使用三態(tài)值中的一個(gè)來(lái)指明打開(kāi)文件的格式。如果忽略，那么文件將以 ASCII 格式打開(kāi)。

設(shè)置

iomode 參數(shù)可以是下列設(shè)置中的任一種：

format 參數(shù)可以是下列設(shè)置中的任一種：

說(shuō)明

下面的代碼說(shuō)明了如何使用 OpenTextFile 方法打開(kāi)文件并追加文本：

[JScript]
var fs, a, ForAppending;
ForAppending = 8;
fs = new ActiveXObject("Scripting.FileSystemObject");
a = fs.OpenTextFile("c:\\testfile.txt", ForAppending, false);
...
a.Close();
[VBScript]
Sub OpenTextFileTest
   Const ForReading = 1, ForWriting = 2, ForAppending = 8
   Dim fso, f
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
   f.Write "Hello world!"
   f.Close
End Sub

請(qǐng)參閱

CreateTextFile 方法 | OpenAsTextStream 方法
應(yīng)用于：FileSystemObject 對(duì)象