web-dev-qa-db-ja.com

テキストの文字列をVBScriptに検索して置き換えます

検索と置換を行うVBScriptを検索しています（1.txt 2.xml）。私は "1.txt"を "1.txt"というファイルがあります。 "一時的な"という言葉があると私はそれを "永続的"に変更したいです。私はこのファイルをたくさん入手しますので私はそれのためのスクリプトが必要です。

TXTファイルを開くスクリプトとコマンドを置き換えるスクリプトを作成しようとするたびに、そうではありません。

このファイルを別のファイルで変更して内部の変更を行うスクリプトを見つけましたが、これは私が探しているものではありません。

vbscript
6
Tzahi

このバージョンを試すことができます。これは、ファイル全体をメモリにスラッキングしません。

Set objFS = CreateObject("Scripting.FileSystemObject")
strFile=WScript.Arguments.Item(0)
strOld=WScript.Arguments.Item(1)
strNew=WScript.Arguments.Item(2)
Set objFile = objFS.OpenTextFile(strFile)
Do Until objFile.AtEndOfStream
 strLine = objFile.ReadLine 
        if Instr(strLine,strOld)> 0 Then
          strLine=Replace(strLine,strOld,strNew)
        End If
 WScript.Echo strLine
Loop
 _

使用法：

c:\test> cscript //nologo find_replace.vbs file oldtext newtext
 _
2
ghostdog74