2014-09-24 99 views
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 

回答

2

使用

Set objFSO = CreateObject("Scripting.FileSystemObject") 

(標出引號,CreateObject()需要一個字符串)