VBS教程:方法-ReadAll 方法

时间:2022-09-22 08:31:18

ReadAll 方法

读入全部 TextStream 文件并返回结果字符串。

object.ReadAll

object 应为 TextStream 对象的名称。

说明

对于大文件,使用 ReadAll 方法浪费内存资源。应该使用其他技术输入文件,例如按行读文件。

Function ReadAllTextFile  Const ForReading = 1, ForWriting = 2  Dim fso, f  Set fso = CreateObject("Scripting.FileSystemObject")  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)  f.Write "世界你好!"  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)  ReadAllTextFile =  f.ReadAllEnd Function