AtEndOfLine

Egenskaberne for AtEndOfLine "TextStream returnerer en boolesk værdi: True angiver, at filen markøren er placeret umiddelbart inden udgangen af linje markør, ellers returneres False.

Bemærk: Denne ejendom vil kun arbejde med en TextStream åbnet for læsning.

Lad os tage et eksempel.
Antag du har en tekstfil (C: \ test.txt) med følgende indhold:

 



 Hej hvad er dit navn?

 

 dim fs, t, x







 "Jeg åbner en instans af FSO







 Set fs = Server.CreateObject ("Scripting.FileSystemObject")

 







 'Jeg åbner filen i skrivebeskyttet tilstand







 sæt T = fs.OpenTextFile ("c: \ test.txt", 1, falske)









 "Jeg opretter en løkke, der er standset i slutningen af ​​linjen







 gøre, mens t.AtEndOfLine <> sandt



  



 x = t.Read (1)







 loop









 "Jeg lukke alt







 t.Close







 Set T = Nothing







 Set fs = Nothing









 'Mold Video







 Udgangen er:

 
 



 Det sidste tegn er:?