如何使用VBScript读取文本文件？
如何使用VBScript读取文本文件？
提问于 2009-05-13 05:33:54
我希望看到一种简单的方式来读取和写入使用VBScript的文本文件。
我认为这是一种可以接受的写入文件的方法。
Dim f,
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateTextFile("C:\test.txt", True, True)
f.WriteLine("Data to Add to file.")
f.Close但是，我想知道如何以类似的方式读取文件。
回答 2
Stack Overflow用户
回答已采纳
发布于 2009-05-13 05:47:02
首先使用OpenTextFile方法，然后...
使用ReadAll方法立即读取文件
Set file = fso.OpenTextFile("C:\test.txt", 1)
content = file.ReadAll或者使用ReadLine方法逐行创建
Set dict = CreateObject("Scripting.Dictionary")
Set file = fso.OpenTextFile ("c:\test.txt", 1)
row = 0
Do Until file.AtEndOfStream
line = file.Readline
dict.Add row, line
row = row + 1
Loop
file.Close
'Loop over it
For Each line in dict.Items
WScript.Echo line
NextStack Overflow用户
发布于 2020-10-27 11:23:36
Dim obj : Set obj = CreateObject("Scripting.FileSystemObject")
Dim outFile : Set outFile = obj.CreateTextFile("in.txt")
Dim inFile: Set inFile = obj.OpenTextFile("out.txt")
' Read file
Dim strRetVal : strRetVal = inFile.ReadAll
inFile.Close
' Write file
outFile.write (strRetVal)
outFile.Close页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/854975
复制相关文章
相似问题