VBS教程:屬性-AtEndOfStream 屬性
更新時間:2006年11月16日 00:00:00 作者:
AtEndOfStream 屬性
如果文件指針位于 TextStream 文件末,則返回 True;否則如果不為只讀則返回 False。
object.AtEndOfStream
object 應為 TextStream 對象的名稱。
說明
AtEndOfStream 屬性僅應用于以只讀方式打開的 TextStream 文件,否則會出現(xiàn)錯誤。
下列代碼舉例說明如何使用 AtEndOfStream 屬性:
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
相關文章
監(jiān)測windows主機網(wǎng)絡接口利用率的vbs代碼
這篇文章主要介紹了監(jiān)測windows主機網(wǎng)絡接口利用率的vbs代碼,不用任何軟件沒有安全隱患,學習vbs的朋友可以參考一下2019-10-10
用VBScript實現(xiàn)解壓縮目錄中的所有文件(Zip)
下面的代碼主要是解壓縮目錄中的所有zip格式文件的實現(xiàn)代碼,需要的朋友可以參考下2012-01-01
IIS管理腳本之a(chǎn)dsutil.vbs的使用說明
Adsutil.vbs是什么?它是Windows 2003的IIS服務自帶的基于命令行下的IIS管理腳本,可以說是命令行下的Internet 信息服務管理器2007-06-06

