如果文件指針正好位于 TextStream 文件中的行尾符之前,則返回true,否則返回 false。只讀。
object.AtEndOfLine
object 總是 TextStream 對象的名稱。
AtEndOfLine 屬性只能應(yīng)用于打開用來讀取的TextStream 文件;否則將產(chǎn)生錯誤。
下面的代碼演示了AtEndOfLine 屬性的用法:
[JScript] function GetALine(filespec) { var fso, a, s, ForReading; ForReading = 1, s = ""; fso = new ActiveXObject("Scripting.FileSystemObject"); a = fso.OpenTextFile(filespec, ForReading, false); while (!a.AtEndOfLine
) { s += a.Read(1); } a.Close( ); return(s); } [VBScript] Function ReadEntireFile(filespec) Const ForReading = 1 Dim fso, theFile, retstring Set fso = CreateObject("Scripting.FileSystemObject") Set theFile = fso.OpenTextFile(filespec, ForReading, False) Do While theFile.AtEndOfLine
<> True retstring = theFile.Read(1) Loop theFile.Close ReadEntireFile = retstring End Function
應(yīng)用于:TextStream 對象