Replace a variable string in vbs

Question

i need to replace a string timestamp(n) with a fix string6) in vbs. where n can be any value and find string should be case insensitive.

strLine = fle1.ReadLine

'strLine = (replace(strLine,"TIMESTAMP(0)","TIMESTAMP(6) ")

Please help me this for any value of n.

Could you show an example (or multiple examples of) strline and what your desired output would be. It's not clear what you mean by TIMESTAMP(0), TIMESTAMP(6), and STRING(6) since VBS doesn't have any of those types natively and the languages that do, differ in how they are formatted. — JNevill
– JNevill, Commented Jun 8, 2016 at 18:51

Ekkehard.Horner · Accepted Answer · 2016-06-08 18:57:24Z

1

Use a Regexp .Replace:

>> 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)

answered Jun 8, 2016 at 18:57

Ekkehard.Horner

38.8k2 gold badges50 silver badges101 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

user6432984 · Accepted Answer · 2016-06-09 13:07:36Z

0

You can use Replace but you can't omit any of the optional parameters.

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

answered Jun 9, 2016 at 13:07

user6432984

Comments

Prabhakar Sinha · Accepted Answer · 2016-06-09 16:44:08Z

0

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

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

I finally did it as i am very new to it, but learning things btw many thanks for help.

answered Jun 9, 2016 at 16:44

Prabhakar Sinha

114 bronze badges

Collectives™ on Stack Overflow

Replace a variable string in vbs

3 Answers 3

Comments

Comments

Comments

Hot Network Questions

Collectives™ on Stack Overflow

3 Answers 3

Comments

Comments

Comments

Related