第1个回答 2009-08-30
为保险起见,建议用VBS吧:
Dim strFile: strFile = "c:\1.txt"
Dim FSO: Set FSO = CreateObject("Scripting.FileSystemObject")
Dim objFile: Set objFile = FSO.OpenTextFile(strFile)
Dim strContent: strContent = objFile.Readall
objFile.Close
Dim objRegEx: Set objRegEx = CreateObject("VBScript.RegExp")
objRegEx.Global = True
objRegEx.IgnoreCase = True
objRegEx.Pattern = "aaa"
Dim objNewText: objNewText = objRegEx.Replace(strContent,"bbb")
Dim objTextFile: Set objTextFile = FSO.CreateTextFile("c:\2.txt")
objTextFile.Write objNewText
objTextFile.Close
Set FSO = Nothing
被替换字符是“aaa”,替换为“bbb”。源文件是c:\1.txt,输出是c:\2.txt,请实际更改。