Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
AtEndOfStream Property
See Also Example Applies To Specifics
Description
Read-only property that returns True if the file pointer is at the end of a TextStream file; False if it is not.
Syntax
object.AtEndOfStream
The object is always the name of a TextStream object.
Remarks
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:
Dim fs, a, retstring
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile("c:\testfile.txt", ForReading, False)
Do While a.AtEndOfStream <> True
retstring = a.ReadLine
...
Loop
a.Close