function Valida_Email(sEmail,sForm) {
 var sOBJ = eval('document.' + sForm + '.' + sEmail + '.value');
 var email = sOBJ.toLowerCase();
 var invalidChars = " /:,;ãõçáéíóúàèìòùâêîôûäëïöü'´#$%&*+§ªº°°?\|<>{}[]¨¢^~`"+'"';
 var validChars = "@"
 var badChar,atPos,periodPos,lOK,vCharAtu,vCharAnt;
 lOK = true;
 
 if(email != '') {
  for (i=0; i<email.length;i++) {
   if (i>0) {
    vCharAtu = email.charAt(i);
	vCharAnt = email.charAt(i-1);
	if ((vCharAtu==vCharAnt) && (validChars.indexOf(vCharAtu,0) > 0)) {
	 alert("Por favor, entre com um endereço de e-mail válido.");
	 lOK = false;
	}
   }
 }
 if (email.indexOf("..",0) >= 0) {
  lOK = false;
 }
 if (email.indexOf("__",0) >= 0) {
  lOK = false;
 }
 if (email.indexOf("@@",0) >= 0) {
  lOK = false;
 }
 if (email.indexOf("--",0) >= 0) {
  lOK = false;
 }
 for (i=0; i<invalidChars.length; i++) {
  badChar = invalidChars.charAt(i);
  if ((email.indexOf(badChar,0) > -1) && lOK) {
   lOK = false;
  }
 }
 atPos = email.indexOf("@",1)
 periodPos = email.indexOf(".",atPos+1)
 if ((atPos == -1) && lOK) {
  alert("Por favor, entre com um endereço de e-mail válido");
  lOK = false;
 }
 if ((periodPos == -1) && lOK) {
  alert("Por favor, entre com um endereço de e-mail válido.");
  lOK = false;
 }
 } else {
 alert("Por favor, entre com seu endereço de e-mail.");
 lOK = false;
}
return lOK;
}