Einführung
Gibt true/false zurück ob sich der Dateisatzzeiger am Ende einer Zeile befindet. Solange der Datensatzzeiger nicht am Zeilenende ist gibt AtEndOfLine immer false zurück.

Syntax
TextStream.AtEndOfLine

Beispiel

1
2
3
4
5
6
7
8
9
10
11

Dim fso, file, strFileText
Const ForReading = 1

Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set file = fso.OpenTextFile("C:\Test.txt", ForReading, false)
Do While not file.AtEndOfLine
strFileText = strFileText & file.Read(1)
Loop
file.Close
set file = nothing
set fso = nothing

top