Linija

Linijos "TextStream savybės grąžina einamosios eilutės numeris faile TextStream.

Paimkime pavyzdžiu.
Tarkime, jūs turite tekstinį failą (C: \ test.txt) Su šiuo turiniu:

 



 Sveiki Koks jūsų vardas?







 Mano vardas Marcello!







 Nice to meet you!

 

Šis kodas

 artimosios FS, t









 "Aš sukurti FSO instancijos







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

 







 "Aš atidaryti failą skaitymo režimas







 Nustatyti T = fs.OpenTextFile ("C: \ test.txt", 1)









 "Loop failą







 = False daryti, o t.AtEndOfStream



  









 kilpa









 "Uždaryti







 t.Close







 Nustatyti T = Nieko







 Nustatyti fs = Nieko

produkcija bus pagaminta:

 



 1 eilutė: Sveiki, kas savo vardą?







 2 linija: Mano vardas yra Marcello!







 Line 3: Nice to meet you!