OpenAsTextStream 方法

打开指定的文件并返回一个 TextStream 对象，可以通过这个对象对文件进行读、写或追加。

object.OpenAsTextStream([iomode, [format]])

参数

object: 必选项。应为 File 对象的名称。
iomode: 可选项。指明输入/输出的模式。可以是三个常数之一： ForReading 、 ForWriting 或 ForAppending 。
format: 可选项。使用三态值中的一个来指明打开文件的格式。如果忽略，文件将以 ASCII 格式打开。

设置

iomode 参数可以是下列设置中的任一种：

常数	值	描述
ForReading	1	以只读方式打开文件。不能写这个文件。
ForWriting	2	以写方式打开文件。如果存在同名的文件，那么它以前的内容将被覆盖。
ForAppending	8	打开文件并从文件末尾开始写。

format 参数可以是下列设置中的任一种：

常数	值	描述
TristateUseDefault	-2	使用系统默认值打开文件。
TristateTrue	-1	以 Unicode 方式打开文件。
TristateFalse	0	以 ASCII 方式打开文件。

说明

OpenAsTextStream 方法提供的功能和 FileSystemObject 的 OpenTextFile 方法一样。另外， OpenAsTextStream 方法可以用来写文件。

下面的代码说明了 OpenAsTextStream 方法的用法：

[JScript]
function TextStreamTest( )
{
   var fso, f, ts, s;
   var ForReading = 1, ForWriting = 2, ForAppending = 8;
   var TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0;
   fso = new ActiveXObject("Scripting.FileSystemObject");
   fso.CreateTextFile( "test1.txt" );           // 创建文件。
   f = fso.GetFile("test1.txt");
   ts = f.OpenAsTextStream(ForWriting, TristateUseDefault);
   ts.Write( "Hello World" );
   ts.Close( );
   ts = f.OpenAsTextStream(ForReading, TristateUseDefault);
   s = ts.ReadLine( );
   ts.Close( );
   return(s);
}
[VBScript]
Function TextStreamTest
   Const ForReading = 1, ForWriting = 2, ForAppending = 8
   Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
   Dim fso, f, ts
   Set fso = CreateObject("Scripting.FileSystemObject")
   fso.CreateTextFile "test1.txt"   ' Create a file.
   Set f = fso.GetFile("test1.txt")
   Set ts = f.OpenAsTextStream(ForWriting, TristateUseDefault)
   ts.Write "Hello World"
   ts.Close
   Set ts = f.OpenAsTextStream(ForReading, TristateUseDefault)
   TextStreamTest = ts.ReadLine
   ts.Close
End Function

请参阅

Copy 方法 | CreateTextFile 方法 | Delete 方法 | Move 方法 | OpenTextFile 方法
应用于：File 对象