VBS教程：属性-AtEndOfStream 属性
更新时间：2006年11月16日 00:00:00 作者：
AtEndOfStream 属性
如果文件指针位于 TextStream 文件末，则返回 True；否则如果不为只读则返回 False。
object.AtEndOfStream
object 应为 TextStream 对象的名称。
说明
AtEndOfStream 属性仅应用于以只读方式打开的 TextStream 文件，否则会出现错误。
下列代码举例说明如何使用 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相关文章
用vbs实现配置无人登录计算机时使用的屏幕保护程序...2007-03-03
用vbs将本地文件替换为在文件服务器上找到的新版本...2007-03-03
有时候我们需要获取执行当前vbs的路径，那么就可以参考下面的代码，一般用来可以删除自身等操作2014-05-05
Excel 中将数值转换为英文单词2009-08-08
飘叶千夫指源代码，又称qq刷屏器...2006-10-10
用vbscript实现文件的复制功能，主要用于一般的备份等操作2008-06-06
文件夹定时自动备份 AutoBackUpFolder.vbs
定时自动备份文件夹到一个以时间命名的新目录，设置好后加到启动项里，只要一启动机器程序就会自动运行，占系统资源可以不计。2009-07-07
通项为自然数n的n次方的的和或积的级数，求和或积的表达式。2009-09-09
这篇文章主要介绍了VBScript版的PHP extract()函数,extract函数主要作用是把数组转换成变量,非常好用的一个函数,需要的朋友可以参考下2014-06-06
貌似网上很多人问怎么用VBS检测U盘插入和弹出，其实这很容易实现，WMI赋予了VBS十分强大的功能。2011-01-01
最新评论