时间:2021-05-08 09:07:47 | 栏目:VBS | 点击:次
读入全部 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