欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

腳本運行時庫  

OpenAsTextStream 方法

打開指定的文件并返回一個 TextStream 對象，可以通過這個對象對文件進行讀、寫或追加。

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

參數(shù)

object
必選項。應為 File 對象的名稱。
iomode
可選項。指明輸入/輸出的模式�？梢允侨齻�常數(shù)之一： ForReading 、 ForWriting 或 ForAppending 。
format
可選項。使用三態(tài)值中的一個來指明打開文件的格式。如果忽略，文件將以 ASCII 格式打開。

設置

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

常數(shù) 值 描述
ForReading 1 以只讀方式打開文件。不能寫這個文件。
ForWriting 2 以寫方式打開文件。如果存在同名的文件，那么它以前的內容將被覆蓋。
ForAppending 8 打開文件并從文件末尾開始寫。

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

常數(shù) 值 描述
TristateUseDefault -2 使用系統(tǒng)默認值打開文件。
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" );           // 創(chuàng)建文件。
   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 對象