<!--
var caracs = new Array();
function ValidaMail(cadena){
var i, j, dsd, prm,cont;

llenarArray();

cad = cadena;

cad = '' + cad;
cade = cad.split(" ");
if (cade.length > 1){
	return false;
	}

for (i=0;i< cadena.length; i++){
  for (j=0; j< caracs.length; j++){
   	 if (cadena.indexOf(caracs[j]) != -1){
	 	    return false;
	  }
	}
  } 
prm = cadena.charAt(0) + cadena.charAt(1) + cadena.charAt(2) + cadena.charAt(3);
if (prm == "www.") {
 return false;
}

dsd = cadena.split("@");
 if (dsd[1] == null){ 
       return false;
 	  }
     else{
     if ((dsd[0].lenght < 3) || (dsd[1] == "")){   
          return false;
     }
 }

if ((dsd[1].indexOf("-") != -1) || (dsd[1].indexOf("_") != -1)){
return false;
}
prm = cadena.charAt(0)
if ((prm == ".") || (prm == "_") || (prm == "-") || (prm == "@")){
 return false;
}
prm = cadena.charAt(cadena.length - 2);
if ((prm == ".") || (prm == "_") || (prm == "-") || (prm == "@")){
   return false;
}
prm = cadena.charAt(cadena.length - 1);
if ((prm == ".") || (prm == "_") || (prm == "-") || (prm == "@")){
   return false;
}
for (i=1;i <= cadena.length; i++)
{
  prm = cadena.charAt(i);
  if ((prm == ".") || (prm == "-") || (prm == "_")){
    prm = cadena.charAt(i+1);	
	  if ((prm == ".") || (prm == "-") || (prm == "_")){
 	    return false;
 	  }
   } 
}
cont = 0;
prm = "@"
for (i=1;i <= cadena.length; i++){
  if (cadena.charAt(i) == prm) {
   cont = cont +1;}
   if (cont >1) {
     return false;
   }
}

if ((cadena.charAt(cadena.length-5)) == "."){
 var cad;
  cad = cadena.split(".")
     if (cad[0] == "www"){
		 return false;
		 }
 
     if ((cad[cad.length -1] != "info") && (cad[cad.length -1] != "name")) { 
	    return false; 
      }
  }
if ((cadena.charAt(cadena.length -3)) != "." && (cadena.charAt(cadena.length -4) != ".") && (cadena.charAt(cadena.length -5) != ".")){
   return false;
}
return true;
}

function llenarArray(){
caracs[0] = "\\";  caracs[1] = "/";  caracs[2] = "º";  caracs[3] = "ª";  caracs[4] = "!";  caracs[5] = "|"; caracs[6] = "#";   caracs[7] = "$";  caracs[8] = "%";  caracs[9] = "&";  caracs[10] = "("; caracs[11] = ")";    caracs[12] = "=";  caracs[13] = "?"; caracs[14] = "¿"; caracs[15] = "'"; caracs[16] = "^"; caracs[17] = "*";    caracs[18] = "¨";  caracs[19] = "Ç"; caracs[20] = "ç"; caracs[21] = "}"; caracs[22] = "{"; caracs[23] = ";";    caracs[24] = ",";  caracs[25] = "€"; caracs[26] = "<"; caracs[27] = ">"; caracs[28] = "¬"; caracs[29] = "+";    caracs[30] = "´";  caracs[31] = ":"; caracs[32] = " ";   
}
-->