0
這是我第一天使用VB腳本。我發現下面的代碼搜索和文本文件替換文本,但是當我運行,使用下面的命令VB腳本錯誤..要求的對象
cscript replace.vbs "test.txt" "Jim" "James"
我得到一個錯誤說
replace.vbs(6, 1) Microsoft VBScript runtime error: Object required: 'Scripting'
下面是代碼
Const ForReading = 1
Const ForWriting = 2
strFileName = Wscript.Arguments(0)
strOldText = Wscript.Arguments(1)
strNewText = Wscript.Arguments(2)
Set objFSO = CreateObject(Scripting.FileSystemObject)
Set objFile = objFSO.OpenTextFile(strFileName, ForReading)
strText = objFile.ReadAll
objFile.Close
strNewText = Replace(strText, strOldText, strNewText)
Set objFile = objFSO.OpenTextFile(strFileName, ForWriting)
objFile.Write strNewText 'WriteLine adds extra CRLF
objFile.Close