windows – 如何使用VBScript从文本文件中读取？

发布时间：2020-12-14 02:15:06 所属栏目：Windows 来源：网络整理

导读：我希望看到一种使用VBScript读取和写入文本文件的简单方法. 我认为这是一种可以接受的写入文件的方法. Dim f,Dim fso Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.CreateTextFile("C:test.txt",True,True) f.WriteLine("Data to Add

我希望看到一种使用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

但是,我想知道如何以类似的方式从文件中读取.

解决方法

Set file = fso.OpenTextFile("C:test.txt",1)
content = file.ReadAll

或逐行

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
Next

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!