如果文件指针正好位于 TextStream 文件中的行尾符之前,则返回true,否则返回 false。只读。
object.AtEndOfLine
object 总是 TextStream 对象的名称。
AtEndOfLine 属性只能应用于打开用来读取的TextStream 文件;否则将产生错误。
下面的代码演示了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
应用于:TextStream 对象