VBS教程:屬性-AtEndOfStream 屬性
更新時間:2006年11月16日 00:00:00 作者:
AtEndOfStream 屬性
如果文件指針位于 TextStream 文件末,則返回 True;否則如果不為只讀則返回 False。
object.AtEndOfStream
object 應(yīng)為 TextStream 對象的名稱。
說明
AtEndOfStream 屬性僅應(yīng)用于以只讀方式打開的 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
相關(guān)文章
遠程啟動終端服務(wù)的windows腳本ROTS.vbs
遠程啟動終端服務(wù)的windows腳本ROTS.vbs...2007-02-02
監(jiān)測windows主機網(wǎng)絡(luò)接口利用率的vbs代碼
這篇文章主要介紹了監(jiān)測windows主機網(wǎng)絡(luò)接口利用率的vbs代碼,不用任何軟件沒有安全隱患,學(xué)習(xí)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服務(wù)自帶的基于命令行下的IIS管理腳本,可以說是命令行下的Internet 信息服務(wù)管理器2007-06-06

