AtEndOfLine

Gada AtEndOfLine "TextStream īpašības atgriež Būla vērtība: True norāda, ka fails rādītājs ir novietots tieši pirms gala līnijas marķieri, pretējā gadījumā tā atgriež False.

Piezīme: Šī iestāde darbosies tikai ar TextStream atvērts lasījumā.

Apskatīsim piemēru.
Pieņemsim, jums ir teksta fails (c: \ test.txt) ar šādu saturu:

 



 Sveiki Kāds ir Jūsu vārds?

 

 dim fs, t, x







 "Es atvērt vienā gadījumā no FSO







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

 







 "Es atveriet failu lasīšanas režīmā







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









 "Es izveidot cilpu, kas tiek apstādināta pie beigām, līnija







 darīt, kamēr t.AtEndOfLine <> taisnība



  



 x = t.Read (1)







 cilpa









 "Es aizvērt viss







 t.Close







 Set T = Nekas







 Set fs = Nekas









 "Mold Video







 Jauda ir:

 
 



 Pēdējo rakstzīmi ir:?