Ανάγνωση

Η Διαβάστε μέθοδος «TextStream διαβάζει ένα συγκεκριμένο αριθμό χαρακτήρων από μια textstream αρχείο και επιστρέφει το αποτέλεσμα ως συμβολοσειρά.

Η εν λόγω μέθοδος δέχεται ως τη μόνη παράμετρο τον αριθμό των χαρακτήρων που θα διαβάσετε.

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

 



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

 

 Dim fs, t, x









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







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

 







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







 σύνολο T = fs.OpenTextFile ("C: \ Test.txt", 1, ψευδής)









 «Διάβασα 4 χαρακτήρες







 x = t.Read (4)









 «Κλείσιμο







 t.close

 







 «Έχω καθαριστεί







 σύνολο T = Τίποτα







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









 «Εκτύπωση σε βίντεο







 Έξοδος:

 
 



 Οι πρώτες τέσσερις χαρακτήρες είναι: hello