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 inválido");
  obj.focus();
  return false;
 }
 return true;
}