Vbscript VB脚本文本文件前置

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

这个怎么样：

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)

---

来源：

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

但是：我不会选择

ReadAllTextFile=f.ReadAll

这条路线，因为那可能只有几GB（谁知道呢？）

相反：

打开一个新文件

写有前缀的行

从旧文件逐行读取，写入新文件

（关闭两个文件）

删除旧文件

重命名新文件->旧文件