..
Iš AtEndOfStream "TextStream savybės grąžina True, jei žymeklis pastatomas į failo pabaigą, priešingu atveju ji grąžina False.
Pastaba: Ši savybė veiks tik su TextStream atidarytas svarstymą.
Paimkime pavyzdžiu.
Tarkime, jūs turite tekstinį failą (C: \ test.txt) Su šiuo turiniu:
Sveiki Koks jūsų vardas? Mano vardas Marcello!Šis kodas
artimosios FS, x, t
"Aš atidaryti vieną egzempliorių FSO
Nustatyti fs = Server.CreateObject ("Scripting.FileSystemObject")
"Aš atviras skaitymo režimas
nustatyti T = fs.OpenTextFile ("C: \ test.txt", 1, FALSE)
"Aš sukurti kilpa, kuri yra sustabdyta failo pabaigoje
daryti, o t.AtEndOfStream <> tiesa
x = t.Read (1)
kilpa
"Aš viską Uždaryti
t.Close
Nustatyti T = Nieko
Nustatyti fs = Nieko
"Mold video
Produkcija yra:
Paskutinis simbolis yra!
-
| |
ASP (Advanced)
Visas kursas sukurti dinaminius interneto svetainių. Nuo 39 €. |
| |
ASP Zero (Ebook)
Mokymosi Microsoft ASP ir VBScript nuo nulio. Ne tik 29 €. |
| |
ASP ir Access (Ebook)
Valdymas MS Access duomenų bazės su ASP. Ne tik 29 €. |