Γραμμή

Οι ιδιότητες του TextStream Γραμμής »επιστρέφει τον αριθμό της τρέχουσας γραμμής σε ένα TextStream αρχείο.

Ας πάρουμε ένα παράδειγμα.
Ας υποθέσουμε ότι έχετε ένα αρχείο κειμένου (c: \ Test.txt) με το ακόλουθο περιεχόμενο:

 



 Γεια σας αυτό είναι το όνομά σου;







 Το όνομά μου είναι Marcello!







 Χαίρω πολύ!

 

Αυτός είναι ο κώδικας

 Dim fs, t









 «Έχω δημιουργήσει μια παρουσία της FSO







 Ορισμός fs = Server.CreateObject ("Scripting.FileSystemObject")

 







 «Έχω ανοίξει το αρχείο σε κατάσταση λειτουργίας ανάγνωσης







 Ορισμός T = fs.OpenTextFile ("C: \ Test.txt", 1)









 «Βρόχος το αρχείο







 = False κάνετε ενώ t.AtEndOfStream



  



 βρόχος









 «Κλείσιμο







 t.Close







 Ορισμός T = Τίποτα







 Ορισμός fs = Τίποτα

η έξοδος θα δημιουργηθούν:

 



 Γραμμή 1: Γεια σας αυτό είναι το όνομά σου;







 Γραμμή 2: Το όνομά μου είναι Marcello!







 Γραμμή 3: Χαίρω πολύ!