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.ReadAll
End Function

请参阅

Close 方法 | Read 方法 | ReadLine 方法 | Skip 方法 | SkipLine 方法 | Write 方法 | WriteLine 方法 | WriteBlankLines 方法

应用于: TextStream 对象