AtEndOfLine

Egenskapene til AtEndOfLine 'TextStream returnerer en boolsk verdi: True angir at filen pekeren er plassert rett før slutten av linjen markør, ellers returneres False.

Merk: Denne egenskapen vil bare virke med en TextStream åpnet for lesing.

La oss ta et eksempel.
Anta at du har en tekstfil (c: \ test.txt) med følgende innhold:

 



 Hei hva heter du?

 

 dim fs, t, x







 Jeg åpne en forekomst av FSO







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

 







 Jeg åpne filen i skrivebeskyttet modus







 sette T = fs.OpenTextFile ("c: \ test.txt", 1, false)









 Jeg lager en løkke som er stoppet på slutten av linjen







 do mens t.AtEndOfLine <> sant



  



 x = t.Read (1)







 sløyfe









 "Jeg lukker alt







 t.Close







 Sett T = Nothing







 Set fs = Nothing









 'Mold Video







 Utgangen er:

 
 



 Det siste tegnet er:?