任何人都知道如何使用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)

来源: Tek Tips

08-27 17:01