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

"^([0-9a-zA-Z]+[-._+&])*[0-9a-zA-Z]+@([-0-9a-zA-Z]+[.])+[a-zA-Z]{2,6}$"

according to Craig Boyd's blog http://www.sweetpotatosoftware.com/spsblog/2006/01/04/ARegularExpressionsLibraryForVisualFoxPro.aspx, it's