Sarake

Sarake omaisuutta "TextStream palauttaa nykyisen paikka.

Huomaa: Tämä ominaisuus pidetään alkuna merkki 1 rivi.
Saadaksesi eräitä nykyisiä merkin linja on tarpeen, käytännössä suorittaa vähentämisen -1 tulokseen tuottamat luonnollinen ominaisuus.

Otetaanpa esimerkki.
Oletetaan, että olet tekstitiedosto (C: \ test.txt) seuraavalla sisällöllä:

 



 Moikka Mikä sinun nimesi on?

 

 hämärä fs, T, x, y









 "Luon esiintymän FSO







 Set fs = Server.CreateObject ("scripting.filesystemobject")

 







 "Avaan tiedoston luku-tilassa







 Aseta t = fs.OpenTextFile ("C: \ test.txt", 1, false)









 "Luon silmukka, joka pysäyttää tiedoston loppuun







 tehdä, kun t.AtEndOfStream <> totta



  



 x = t.Read (1)



  



 y-1 = t.Column







 silmukka









 "Suljen kaiken







 t.Close







 Aseta T = Nothing







 Set fs = Nothing









 "Tulosta video

 





 Lähtö:

 
 



 Viimeinen merkki tekstitiedosto on:?







 merkkipaikkaan: 20