Hey,

You need to change this:

set objregx
objregx.pattern = "(1-)?\d{3,}-\d{3,}-\d{4,}"

to this:

set objregx = New RegExp
objregx.pattern = "(1-)?\d{3,}-\d{3,}-\d{4,}"

I don't know why you do it in this manner... everything else is done through CreateObject(), but in all of the examples that I've seen, this is how it is done. Let me know if that works out for you. It may be Regex instead; I can't remember because when .NET came out, they renamed the library.

Brian