The usage of AtEndOfStream attribute under VBS

This article mainly explains "the usage of AtEndOfStream attribute under VBS". Interested friends may wish to have a look at it. The method introduced in this paper is simple, fast and practical. Now let the editor take you to learn "the usage of AtEndOfStream attribute under VBS".

Returns True; if the file pointer is at the end of the TextStream file, otherwise returns False if not read-only.

Object.AtEndOfStream

Object should be the name of the TextStream object.

Description

The AtEndOfStream attribute applies only to TextStream files that are opened as read-only, otherwise an error will occur.

The following code illustrates how to use the AtEndOfStream property:

Function ReadEntireFile (filespec) Const ForReading = 1 Dim fso, theFile, retstring Set fso = CreateObject ("Scripting.FileSystemObject") Set theFile = fso.OpenTextFile (filespec, ForReading, False) Do While theFile.AtEndOfStream True retstring = theFile.ReadLine Loop theFile.Close ReadEntireFile = retstringEnd Function so far, I believe you have a deeper understanding of "the use of AtEndOfStream attributes under VBS". You might as well do it in practice. Here is the website, more related content can enter the relevant channels to inquire, follow us, continue to learn!