function eEmail(st){if(st!=""){var ps=0;if(window.RegExp){var tms="a";var tmr=new RegExp(tms);if(tmr.test(tms))ps=1;}
if(!ps)return(st.indexOf(".")>2)&&(st.indexOf("@")>0);var r1=new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(^\\.)");var r2=new RegExp("^[a-zA-Z0-9\\.\\!\\#\\$\\%\\&\\'\\*\\+\\-\\/\\=\\?\\^\\_\\`\\{\\}\\~]*[a-zA-Z0-9\\!\\#\\$\\%\\&\\'\\*\\+\\-\\/\\=\\?\\^\\_\\`\\{\\}\\~]\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,3}|[0-9]{1,3})(\\]?)$");return(!r1.test(st)&&r2.test(st));}
return true}
function ChkEma(obj){if(!eEmail(obj.value)){alert("E-mail incorreto!");obj.focus();return false;}
return true;}