vbscript - VB 脚本文本文件前置

Question

任何人都知道如何使用 VB 脚本或 Bat 文件快速将（添加两行新文本）添加到现有文本文件的开头？最优雅的解决方案得到了勾选。

Answer 1

这个怎么样：

Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.OpenTextFile("test.txt", 1)
ReadAllTextFile =   f.ReadAll
Set f = fso.OpenTextFile("test.txt", 2, True)
f.WriteLine("Blaaa")
f.WriteLine("Blaaaa some more...")
f.Write(ReadAllTextFile)

资料来源： 泰克提示

Answer 2

查看 José Basilios 的答案以获取代码和对 FSO 的参考。你将使用它。

但是：我不会走这ReadAllTextFile = f.ReadAll条路，因为那可能是几千兆字节（谁知道？）。

代替：

1. 打开一个新文件
2. 写前置行
3. 从旧文件逐行读取，写入新文件
4. （关闭两个文件）
5. 删除旧文件
6. 重命名新文件 -> 旧文件