function FormValidator()
	{
		var autor = document.getElementById('Autor')
	
		if (autor.value=="")
		{
			alert("Introduzca su nombre")
			autor.focus();
			return (false);
		}
		
		var ciudad = document.getElementById('Poblacion')
		
		if (ciudad.value=="")
		{
			alert("Introduzca su ciudad")
			ciudad.focus();
			return (false);
		}
		
		var nif = document.getElementById('NIF')
		
		if (nif.value=="")
		{
			alert("Introduzca su NIF")
			nif.focus();
			return (false);
		}	
		if (validarNIF(nif.value)==false)
		{
	       		alert("El formato del NIF introducido no es correcto");
	       		nif.focus();
	       		nif.select();
	       		return (false);
		}
			
		var titulo = document.getElementById('Titulo') 
		
		if (titulo.value=="")
		{
			alert("Introduzca el título de su comentario")
			titulo.focus();
			return (false);
		}
		
		var texto = document.getElementById('TextoCarta')
		var textoLength = texto.value.length
		
		
		if (textoLength<=1)
		{
			alert("Introduzca el texto de su comentario")
			texto.focus();
			return (false);
		}
		else if (textoLength>20000)
		{
			alert("Su comentario no debe exceder los 3500 caracteres")
			texto.focus();
			return (false);
		}
		
		return true;
	}


	function validarNIF(nif){
		//Comprobamos si es un NIE
		var nonif_personas="KLXM"; 
		var primero=nif.substr(0,1); 
		primero=primero.toUpperCase(); 
		var pfnodni=nonif_personas.search(primero); 
		if (pfnodni !=-1){
			return ValidarNIE(nif);
		}
		//no es un NIE
		abc=nif;
		dni=abc.substring(0,abc.length-1);
		let=abc.charAt(abc.length-1);
		if (!isNaN(let)){
			return false;
		}
		else{
			cadena="TRWAGMYFPDXBNJZSQVHLCKET";
			posicion = dni % 23;
			letra = cadena.substring(posicion,posicion+1);
			if (letra!=let.toUpperCase()){
		 		return false;
			}
		}
		return true;
	}
	
	function ValidarNIE (nie) { 
		var NIFStr=nie; 
		var control_personas="TRWAGMYFPDXBNJZSQVHLCKE"; 
		var nonif_personas="KLXM"; 

		var primero=NIFStr.substr(0,1); 
		primero=primero.toUpperCase(); 

		var medio=NIFStr.substr(1,NIFStr.length-2); 
		medio=medio.toUpperCase(); 

		var ultimo=NIFStr.substr(NIFStr.length-1,1); 
		ultimo=ultimo.toUpperCase(); 

		var pfnodni=nonif_personas.search(primero); 

		if (pfnodni !=-1){ 
			if((medio.search("/^\D+/gi")!=-1)||(ultimo.search("[0-9]")!=-1)){ 
				return false; 
		    } 
		    else{ 
				var n = NIFStr.substr(1,NIFStr.length-2); 
				var resto = n%23; 
				var control= control_personas.substr(resto,1); 
				if (ultimo == control){ 
					return true; 
				} 
				else{ 
					return false; 
				} 
		    
		    }   
		}
		else
		{
			return false; 
		}
}