Remplacer une chaîne de variables en vbs - string, vbscript

je dois remplacer une chaîne timestamp (n) par un correctif string6) en vbs. où n peut être n'importe quelle valeur et find doit être sensible à la casse.

strLine = fle1.ReadLine

"strLine = (remplacez (strLine," TIMESTAMP (0) "," TIMESTAMP (6) ")

S'il vous plaît aidez-moi ceci pour toute valeur de n.

Réponses:

Utilisez une expression rationnelle.Remplacer:

>> Set r = New RegExp
>> r.Pattern = "TIMESTAMP(d+)"
>> For Each s In Split("TIMESTAMP(1) TIMESTAMP(11) TIMESTAMP(9)")
>>     WScript.Echo s, r.Replace(s, "TIMESTAMP(6)")
>> Next
>>
TIMESTAMP(1) TIMESTAMP(6)
TIMESTAMP(11) TIMESTAMP(6)
TIMESTAMP(9) TIMESTAMP(6)

Vous pouvez utiliser Remplacer, mais vous ne pouvez omettre aucun des paramètres facultatifs.

strLine = Remplacer (fle1.ReadLine, "TIMESTAMP (0)", "TIMESTAMP (6)", 1, -1, 1)

Set regEx = CreateObject("VBScript.RegExp")
"regEx.Pattern = "(TIMESTAMP([0-9].?))"
"regEx.IgnoreCase = True

"strLine=regEx.Replace(strLine, "TIMESTAMP(6)")

Je l'ai finalement fait car je suis très nouveau, mais j'apprends des choses Merci beaucoup pour l'aide.