Casey, in a form i set a local variable to loc:eMailFrom (entry field) and in embed point Validate All the following code
X# = MATCH(UPPER(CLIP(loc:eMailFrom)),|
'^[-A-Z0-9._]+@{{[-A-Z0-9._]+\.}+[A-Z][A-Z][A-Z]?[A-Z]?$', Match:Regular)
IF X# <> 1
loc:invalid = 'loc:eMailFrom'
p_web.SetValue('retry','EmailFormControl')
loc:Alert = 'Invalid eMail.'
ELSE
!Procedure to send the eMail
SendEmail(eMailParams)
END!If