AtEndOfStream Property (FileSystemObject)
Returns true if the file pointer is at the end of a TextStream file; false if it is not. Read-only.
Syntax
object.AtEndOfStream
Remarks
The object is always the name of a TextStream object.
The AtEndOfStream property applies only to TextStream files that are open for reading, otherwise, an error occurs.
The following code illustrates the use of the AtEndOfStream property:
function GetALine(filespec)
{
var fso, f, s, ForReading;
ForReading = 1, s = "";
fso = new ActiveXObject("Scripting.FileSystemObject");
f = fso.OpenTextFile(filespec, ForReading, false);
while (!f.AtEndOfStream)
s += f.ReadLine( );
f.Close( );
return(s);
}
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.AtEndOfStream <> True
retstring = retstring & theFile.ReadLine
Loop
theFile.Close
ReadEntireFile = retstring
End Function
Applies To:
Change History
Date |
History |
Reason |
---|---|---|
April 2009 |
Modified Visual Basic Scripting Edition (VBScript) example. |
Customer feedback. |