任何人都知道如何使用VB脚本或Bat文件快速预先添加(添加两行新文本)到现有文本文件的开头?最优雅的解决方案得到了解决方案。
答案 0 :(得分:5)
这个怎么样:
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)
来源: Tek Tips
答案 1 :(得分:5)
检查JoséBasilios的答案,以获取FSO的代码和参考。你将使用它。
但是:我不会去ReadAllTextFile = f.ReadAll
路线,因为那可能是几千兆字节(谁知道?)。
INSTEAD :