>>>>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
>
>I tried the pattern suggested by Sergey in this thread and it works fine and much simpler. However, I haven't tested it too thorough yet - may be that pattern is too generous.

According to what Craig said, the pattern I presented is the "official" version.