AtEndOfStream

Vlastnosti objektu TextStream AtEndOfStream "vracia true v prípade, že ukazovateľ je umiestnený na konci súboru, inak vracia False.

Poznámka: Táto vlastnosť bude fungovať iba s TextStream objekt otvorený pre čítanie.

Zoberme si príklad.
Predpokladajme, že máte textový súbor (C: \ test.txt) s nasledujúcim obsahom:

 



 Dobrý deň, Ako sa voláte?







 Moje meno je Marcello!

 

 dim fs, t, x









 "Otvorím stupňa FSO







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

 







 "Otvoril som čítal v režime







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









 "Ja vytvoriť slučku, ktorá sa zastaví na konci súboru







 robiť, keď t.AtEndOfStream <> true



  



 x = t.Read (1)







 slučka









 "Aj zatvorte všetky







 t.Close







 Nič nastavenia T =







 Set fs = Nothing









 "Pleseň Video







 Výstup je:

 
 



 Posledný znak je:!