>This is the function I use

>Function ValidEmail
>   Lparameters lcMail
>   Local ox, llReturn
>   If Pcount()>0 And Vartype(lcMail)='C'
>      ox=Createobject('VBScript.RegExp')
>      ox.Pattern= '^[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]' + ;
>         '@[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]' + ;
>         '\.[a-zA-Z]{2,4}$'
>      ox.IgnoreCase= .T.
>      ox.Global=.F.
>      llReturn=ox.Test(lcMail)
>      Release ox
>      ox=.Null.
>   Endif
>Return llReturn

>
I tried this and another pattern, and they both reject this e-mail

FLastname@name-mtn.com

But I know it's a valid e-mail. What pattern is correct for e-mail validations?