Kolumna

Obiekt Kolumna "TextStream zwraca aktualną pozycję charakter.

Uwaga: Ta nieruchomość nie jest uważane za początek znaków 1 linii.
Aby uzyskać numer bieżący znak w linii jest niezbędne w praktyce wykonać odejmowanie od -1 do wynik wyprodukowany przez tę naturalną właściwość.

Weźmy przykład.
Załóżmy, że masz plik tekstowy (c: \ test.txt) z następującą zawartość:

 



 Witaj, jak masz na imię?

 

 słabym fs, t, x, y









 "I utworzyć instancję FSO







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

 







 "I otworzyć plik w trybie odczytu







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









 "I stworzyć pętlę, która zatrzyma się na końcu pliku







 zrobić, gdy t.AtEndOfStream <> true



  



 x = t.Read (1)



  



 y-1 = t.Column







 pętla









 "Ja się wszystko







 t.Close







 Zestaw T = Nothing







 Set fs = Nothing









 "Drukuj do wideo

 





 Wyjście:

 
 



 Ostatni znak w pliku tekstowym jest:?







 pozycji znaku: 20