使用VBS替换任何给定文件中的单词

Question

我不是在使用VB脚本。

我有一个场景，我有一个.ini文件驻留在C：\ widows \。我只需要用计算机名替换2号线。

任何帮助将不胜感激。

Answer 1

这样的事情应该有效：

Set fso = CreateObject("Scripting.FileSystemObject")

filename = "C:\Windows\your.ini"

text = Split(fso.OpenTextFile(filename).ReadAll, vbNewLine)
text(1) = CreateObject("WScript.Network").ComputerName
fso.OpenTextFile(filename, 2).Write Join(text, vbNewLine)