My bad, this was for phone number. It still isn't working on this pc which is controlled by city govt.

John


>No, the pattern you're using has invalid regular expression - '{4)'
>

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