<!--
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] = " ";   
}

function CompruebaCIF(elCIF) 
 {
  var resul = false;
  // pasar a mayúsculas
  var temp = elCIF.value.toUpperCase(); 
  if (!/^[A-Za-z0-9]{9}$/.test(temp)) // Son 9 dígitos?
   alert ("Longitud incorrecta, un CIF consta de 9 dígitos");
  else if (!/^[ABCDEFGHKLMNPQS]/.test(temp)) 
   // Es una letra de las admitidas?
   alert("El primer dígito es incorrecto, debe ser una letra de las siguientes: A,B,C,D,E,F,G,H,K,L,M,N,P,Q,S ");
  else
  resul = true;
   return resul;
 }
  // La función recibe el CIF completo: A58818501
  function ValidaCIF(F)
  {
   var v1 = new Array(0,2,4,6,8,1,3,5,7,9);
   var temp = 0;
   for( i = 2; i <= 6; i += 2 ) 
   {
    temp = temp + v1[ parseInt(F.elCIF.value.substr(i-1,1))];
    temp = temp + parseInt(F.elCIF.value.substr(i,1));
   };
   temp = temp + v1[ parseInt(F.elCIF.value.substr(7,1))];
   temp = (10 - ( temp % 10));
   if( temp == 10 )
    alert( "El dígito de control es: J ó 0" );
   else
    alert( "El dígito de control es: "+temp );
   return true;
  }
function nif(dni) {
  numero = dni.substr(0,dni.length-1);
  let = dni.substr(dni.length-1,1);
  let = let.toUpperCase();
  numero = numero % 23;
  letra='TRWAGMYFPDXBNJZSQVHLCKET';
  letra=letra.substring(numero,numero+1);
  if (letra!=let){ 
    return false;}
	else{
		return true;
		}
}

-->