


        var activeInput;
        activeInput = new Object()
		function marcaInput(elInput) {
		
		            elInput.style.cursor='pointer';
				    elInput.onclick = function(){activeInput = elInput ; elInput.value=''}; 
    		        elInput.onfocus = function(){elInput.style.backgroundColor='yellow'};
                    elInput.onblur = function(){elInput.style.backgroundColor='#00ff00'};
		            elInput.ondblclick =  function(){elInput.value=''} ;
	    }




		

		
		function validaRich(eltxt, eltxtR, chkVacio, chkAncho) {
			eltxt.value = eltxtR.getHTML();
			eltxt.value = eltxt.value.replace(/<a /gi,'<a target=new ');
			if (chkVacio) if (eltxt.value.replace(/\s/gim, '') == ''){
					alert(txt_PF_introduzca_el_campo);
					eltxtR.focusEditor();
					eltxtR._doc.body.style.backgroundColor='#ff9999'; 
					eltxtR._doc.body.onkeydown =  function kk() {eltxtR._doc.body.style.backgroundColor='#ffffff';};
					return false;
					}
			if (eltxt.value.search(/<form|<\/form/i) >= 0){alert(txt_Form_no_permitido);eltxtR.focusEditor();return false;};
			if (chkAncho) if (eltxtR._doc.body.scrollWidth > eltxtR.config.width) {alert(txt_Ancho_nota_grande);eltxtR.focusEditor();return false;}
			return true
		}
		




		//DoExamen , evita que haya respuestas en blanco Texto no rico txtboxes multiples
		function ValidaTxtExm(frm) {
			var i;
			for (i = 0; i < frm.elements.length; i++) {
				if (frm.elements[i].type == "textarea") {
					if (frm.elements[i].value.replace(/ /g,'') == ''){alert("No puede haber respuestas en blanco");frm.elements[i].focus();return false;}
				}
			}
			return true;
		}


		//Marca y desmarca de golpe un grupo de checkboxes
		function MarcaDesmarca(idFrom,idTo) {
			var i;
			for (i = 0; i < idTo.length; i++) {
				    if (idFrom.checked == false) idTo[i].checked = false;
				    if (idFrom.checked == true) idTo[i].checked = true;
			}
		}




		//Elimina el problema de las comillas y de las dobles comillas
		function LasComill(frm) {
			var i;
			for (i = 0; i < frm.elements.length; i++) {
				if (frm.elements[i].type == "text"){
					//alert("cambiando "+frm.elements[i].value)
					frm.elements[i].value=frm.elements[i].value.replace(/'/g,"´");
					frm.elements[i].value=frm.elements[i].value.replace(/"/g,"&quot;");
				}
				if (frm.elements[i].type == "textarea"){
					frm.elements[i].value=frm.elements[i].value.replace(/'/g,"´");
					//frm.elements[i].value=frm.elements[i].value.replace(/'/g,"&#039;");
				}
				//alert(frm.elements[i].type);
				//alert(frm.elements[i].tagName);
				//if (frm.elements[i].type == "hidden"){
				//frm.elements[i].value=frm.elements[i].value.replace(/'/g,"&#039;");
				//frm.elements[i].value=frm.elements[i].value.replace(/"/g,"&quot;");
				//}
				//if (frm.elements[i].type == "select-one"){
				//if (frm.elements[i].type == "select-multiple"){
				if (frm.elements[i].tagName == "SELECT"){
					var idx = frm.elements[i].selectedIndex
					frm.elements[i].options[idx].value=frm.elements[i].options[idx].value.replace(/'/g,"´");
					frm.elements[i].options[idx].value=frm.elements[i].options[idx].value.replace(/"/g,"&quot;");
				}
			}
		}
		



        // aqui recogemos el objeto HTMLArea (TextoR) para procesarlo
		var TextoR
		function GetValor(elValor) {
			TextoR = elValor;
		}





		



		function ValidaTxt(frm) {
			var i, elemento;
			var cadenaOK = "abcdefghijklmnopqrstuvwxyz1234567890"
			var cadenaPwOK = "ABCDEFGHIJKLMNOPQRSTUVXYZ@%$&?¿¡Ççabcdefghijklmnopqrstuvwxyz1234567890"	
		
			if(frm.ToID){if(frm.ToID.value==''){alert(txt_PF_introduzca_el+txt_destinat);return false;};};
		    
		    for (i = 0; i < frm.elements.length; i++) {
				elemento = frm.elements[i];
				//debugger;
				if ((elemento.className == "inTextoReq") | (elemento.className == "inTextoPadReq")){
					if (elemento.value.replace(/ /g,'') == ''){
							alert(txt_PF_introduzca_el_campo);
							elemento.focus();
							elemento.style.backgroundColor='#ff9999'; 
							elemento.onkeydown =  function kk() {elemento.style.backgroundColor='#ffffff';};
							return false;
						}
				}
			}
			
			
			if (frm.ownerDocument.FileUploadMulti) {if (frm.ownerDocument.FileUploadMulti.getFileCount() == 0){alert(txt_PF_introduzca_el+txt_fich);return false;};};
			
			
			


			if (frm.passwd) {
				if (frm.passwd.value.replace(/ /g,'') == ''){alert(txt_PF_introduzca_el+txt_clave);frm.passwd.focus();return false;}
				if (frm.passwd.value.length < 6) {alert(txt_Long_corta_clave);frm.passwd.focus();return (false);}
				//if (frm.passwd.value.length > 8) {alert(txt_Long_larga_clave);frm.passwd.focus();return (false);}
				// comprueba que el passwd no tiene blancos ni caracteres raros
				for (var i = 0 ;i <= frm.passwd.value.length-1 ; i++) {
				    if (cadenaPwOK.indexOf(frm.passwd.value.charAt(i)) == -1) {
						alert(txt_Clave_no_valid);
						frm.passwd.focus();
						return (false);
					}
				}
			}
					
					
					
												

			if (frm.usuarioNew) {
				//if (frm.usuarioNew.value.length < 6) {alert(txt_Long_corta_user);frm.usuarioNew.focus();return (false);}
				//if (frm.usuarioNew.value.length > 10) {alert(txt_Long_larga_user);frm.usuarioNew.focus();return (false);}
				// comprueba que el usuario no tiene blancos ni caracteres raros
				for (var i = 0 ;i <= frm.usuarioNew.value.length-1 ; i++) {
					if (cadenaOK.indexOf(frm.usuarioNew.value.charAt(i)) == -1) {
						alert(txt_User_no_valid);
						frm.usuarioNew.focus();
						return (false);
					}
				}
			}

			if (frm.usuario) {
				if (frm.usuario.value.replace(/ /g,'') == ''){alert(txt_PF_introduzca_el+txt_id_usuario);frm.usuario.focus();return false;}
				//if (frm.usuario.value.length < 6) {alert(txt_Long_corta_user);Form1.usuario.focus();return (false);}
				//if (frm.usuario.value.length > 10) {alert(txt_Long_larga_user);Form1.usuario.focus();return (false);}
				// comprueba que el usuario no tiene blancos ni caracteres raros
				for (var i = 0 ;i <= frm.usuario.value.length-1 ; i++) {
					if (cadenaOK.indexOf(frm.usuario.value.charAt(i)) == -1) {
					alert(txt_User_no_valid);
					frm.usuario.focus();
					return (false);
					}
				}
			}

			
			
			
			
			//Texto rico
			if (frm.Texto) {if (validaRich(frm.Texto, TextoR,true,true) == false ) return false;}
			//no limita el tamaño de las imagenes
			if (frm.TextoNoLimit) {if (validaRich(frm.TextoNoLimit, TextoNoLimitR,true,false) == false ) return false;}
			if (frm.respuesta1) {if (validaRich(frm.respuesta1, respuesta1R,true,true) == false ) return false;}
			if (frm.respuesta2) {if (validaRich(frm.respuesta2, respuesta2R,true,true) == false ) return false;}
			if (frm.respuesta3) {if (validaRich(frm.respuesta3, respuesta3R,false,true) == false ) return false;}
			if (frm.respuesta4) {if (validaRich(frm.respuesta4, respuesta4R,false,true) == false ) return false;}
			if (frm.respuesta5) {if (validaRich(frm.respuesta5, respuesta5R,false,true) == false ) return false;}
			if (frm.comentario1) {if (validaRich(frm.comentario1, comentario1R,false,true) == false ) return false;}
			if (frm.comentario2) {if (validaRich(frm.comentario2, comentario2R,false,true) == false ) return false;}
			if (frm.comentario3) {if (validaRich(frm.comentario3, comentario3R,false,true) == false ) return false;}
			if (frm.comentario4) {if (validaRich(frm.comentario4, comentario4R,false,true) == false ) return false;}
			if (frm.comentario5) {if (validaRich(frm.comentario5, comentario5R,false,true) == false ) return false;}
			if (frm.notaTxto1) {if (validaRich(frm.notaTxto1, notaTxto1R,true,true) == false ) return false;}
			if (frm.notaTxto) {if (validaRich(frm.notaTxto, notaTxtoR,true,true) == false ) return false;}
			
			
			
			
		
			if (frm.totalPregs) {if ((frm.totalPregs.value == 0) & (frm.action == 'TemaMod.aspx') & (frm.showTema.checked == true)){alert(txt_Num_pregs_noO);return false;}};
			if (frm.numPregs) {if ((frm.numPregs.value == 0) & (frm.action == 'TemaMod.aspx') & (frm.showTema.checked == true)){alert(txt_Num_pregs_noO);return false;}};


			if (frm.ownerDocument.getElementById('messProc')){frm.ownerDocument.getElementById('messProc').style.display='none'};
			if (frm.ownerDocument.getElementById('PBar')){frm.ownerDocument.getElementById('PBar').style.display='inline'}
		
	
			LasComill(frm);  //soluciona el problema de las comillas y dobles comillas
			

			return true;
		}


//No deja escribir los caracteres: <'> <"> <¿> <?>
//Útil en caso de textareas para dar nombres a archivos
 function check_car()
 {
	if (event.keyCode==34 || event.keyCode==39 || event.keyCode==63 || event.keyCode==168)
		{ 
		event.returnValue = false;
		}
 }
		
		
		
		
		




