oRegEx = NEWOBJECT("VBScript.RegExp") oRegEx.Pattern = "\[(\d)\]" cFile = oRegEx.Replace(cFile, "[0$1]")