ReadAll

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

Σημείωση: Αυτή η μέθοδος δεν είναι κατάλληλη για μεγάλα αρχεία (όπως είναι σπατάλη μεγάλων πόρους μνήμης).

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

 



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

 

 Dim fs, t, x









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







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

 







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







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









 «Έχω διαβάσει όλα τα περιεχόμενα του αρχείου







 x = t.ReadAll









 «Κλείσιμο







 t.close

 







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







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







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









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







 Έξοδος:

 
 



 Το αρχείο κειμένου είναι: Γεια σας αυτό είναι το όνομά σου;