>lcExpression ="(\b[0-9]{3}-[0-9]{4}\b)"
>
>>When I run your code, I get an error - unknown com status. Do you think my pc has vbscript disabled?>>LPARAMETERS tcnarr >>* ssn pattern >>lcExpression ="(\b[0-9]{3}-[0-9]{4)\b)" >>loRegExp = CreateObject("VBScript.RegExp") >>loRegExp.IgnoreCase = .T. >>loRegExp.Pattern = LCexpression >>RETURN loRegExp.Test(tcnarr) >>