Questione : Trovare e sostituire i valori multipli

Approvazione, esso ancora - il
I ha un .vbs molto semplice per trovare e sostituire una stringa; tuttavia, gradirei ai valori multipli di codice duro (o alla configurazione in un dialouge dell'input dell'utente per chiedere all'utente il ritrovamento seguente e per sostituire stringa) in uno scritto.  Ciò è che cosa ho attualmente: class= " lineNumbers " >

1 del >
Const ForReading = 1
Const ForWriting = 2
Regolare il objFSO = CreateObject (“Scripting.FileSystemObject„)
Regolar objFile = objFSO.OpenTextFile (“C:\Scripts\123.txt„, ForReading)
strText = objFile.ReadAll
objFile.Close
lo strNewText = sostituisce (strText, “043487835„, “04-3487835„)
objFile stabilito = objFSO.OpenTextFile (“C:\Scripts\123.txt„, ForWriting)
strNewText di objFile.WriteLine
il class= >
I di objFile.Close
1 del >
Const ForReading = 1
Const ForWriting = 2
Regolare il objFSO = CreateObject (“Scripting.FileSystemObject„)
Regolar objFile = objFSO.OpenTextFile (“C:\Scripts\123.txt„, ForReading)
strText = objFile.ReadAll
objFile.Close
lo strNewText = sostituisce (strText, “043487835„, “04-3487835„)
lo strNewText = sostituisce (strText, “5551234„, “5551235„)
objFile stabilito = objFSO.OpenTextFile (“C:\Scripts\123.txt„, ForWriting)
strNewText di objFile.WriteLine
class= >
I di objFile.Close


class= > " libero " del 

soluzioni >Related 
class= 
il title= " del href= " /Programming/Languages/Visual_Basic/VB_Script/Q_26419932.html di Replace " del class= specifico " del testo o della linea " dopo la linea specifica o text

Risposta : Trovare e sostituire i valori multipli

Sono un tipo di PowerShell, ma penso qui sono il problema nella linea 8 (secondo scritto):
lo strNewText = sostituisce (strNewText, “5551234„, “5551235„)