Vista - Re: String manipulation using replace etc.

Hi,

The objective is to replace all "o" (alphabet - lower or upper) to
"0" (number zero) in the string "opt". opt is a user input and hence
varies.

Here's my code that does not work
=========================
opt="o3050406252602O127oT1528oM16"
wscript.echo ReplaceTest(left(opt,2),"o","0") ' gives 03 - correct
extract2=ReplaceTest(left(opt,2),"o","0") 'extract2 = o3
incorrect ???? why

Function ReplaceTest(str2,patrn, replStr)
Dim regEx ' Create variables.
Set regEx = New RegExp ' Create regular expression.
regEx.Pattern = patrn ' Set pattern.
regEx.IgnoreCase = True ' Make case insensitive.
ReplaceTest = regEx.Replace(str2, replStr) ' Make replacement.
End Function