Coloană

Coloana de proprietate "TextStream returnează poziţia caracterului curent.

Notă: Această proprietate este considerat ca fiind începutul caracterului 1 linie.
Pentru a obţine numărul de caractere curent, în linie este necesar, în practică, efectua o scădere de -1 la rezultatul produs de această proprietate naturale.

Să luăm un exemplu.
Să presupunem că aveţi un fişier text (c: \ test.txt), cu următorul cuprins:

 



 Buna ziua Care este numele tau?

 

 dim fs, t, x, y









 "Am crea o instanţă a FSO







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

 







 "Am deschide fişierul în modul de citire







 set T = fs.OpenTextFile ("c: \ test.txt", 1, fals)









 "Am crea o buclă care este oprit la sfârşitul fişierului







 face în timp ce t.AtEndOfStream <> adevărat



  



 x = t.Read (1)



  



 y-1 = t.Column







 buclă









 "Am aproape tot ceea ce







 t.Close







 Set T = Nimic







 Set fs = Nimic









 "Imprimare la video

 





 De ieşire:

 
 



 Ultimul caracter din fisier text este:?







 caracterul din poziţia: 20