		
	//Variables Globales
	MensajePrivacidad = "CopyRight 2002, Consultia, S. L."
	
	//''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
	//Funciones Generales
	//Función que nos elimina los espacios de un cadena por detrás y por delante.
	function quitaEspacios(cOri){
		indice = cOri.length;
		for(j=0;j<cOri.length;j++){
			if(cOri.charAt(j)!=" "){
				indice = j;
				break;
			}
		}
		if(indice!=cOri.length){
			cad = cOri.substring(indice,cOri.length);
		}
		else cad = "";
		return cad;
	}

	function invierte(cad){
		v = "";
		for(i=0;i<sinUno.length;i++){
			v = v + cad.charAt(cad.length-1-i);
		}
		return v;
	}

	function trim(){
		cOri = this;
		sinUno = quitaEspacios(cOri);			
		Invertida = invierte(sinUno);
		sinDos = quitaEspacios(Invertida);
		return invierte(sinDos);
	}	

	String.prototype.Trim = trim;
	//###########################################################

	//Funciones para inavilitar el botón derecho.
	function NoBotonDerecho(){
		mouse = window.event.button;
		if((mouse==2) || (mouse==3)) alert(MensajePrivacidad); return false;		
	}

	function NoMenu(){
		alert(MensajePrivacidad);
		return false;
	}
	
	//Función auxiliar para validar un e-mail
	function EmailCorrecto(email){
		if(/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(email)){ 
			return true;
		}
		else return false;	
	}
	//''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''


function Entrar(){
	window.open('acceso_01.asp','Remoto','top=2000,left=2000,height=1,width=1')
}
	
function validarEntrada(){
	form.login.value = form.login.value.Trim();
	if(form.login.value==""){
		alert("Debe introducir su login");
		form.login.value = "";
		form.login.focus();
		return false;
	}
	else{
		form.clave.value = form.clave.value.Trim();
		if(form.clave.value==""){
			alert("Debe introducir su clave");
			form.clave.value = "";
			form.clave.focus();
			return false;
		}
	}
}		

function IrA(){
	var dir = form.aplicacion.value;

	if (dir=="cerrarsesion.asp") top.location.href = dir;
	else top.parteInf.location.href = dir;
}

//Funciones para desplegar las categorías en el explorador
function Desplegar(id){			
	eval("Img = form.inimg" + id + ".value");
	
	if(Img=="mas"){
		eval("form.inimg" + id + ".value = 'men'");
		eval("seccion" + id + ".style.display='inline'");		
		eval("form.img" + id + ".src = '../../images/men.gif'");
	}
	else{
		eval("form.inimg" + id + ".value = 'mas'");
		eval("seccion" + id + ".style.display='none'");		
		eval("form.img" + id + ".src = '../../images/mas.gif'");
	}
}

function DesplegarPublico(id){			
	eval("Img = form.inimg" + id + ".value");
	
	if(Img=="mas"){
		eval("form.inimg" + id + ".value = 'men'");
		eval("seccion" + id + ".style.display='inline'");		
		eval("form.img" + id + ".src = 'images/men.gif'");
	}
	else{
		eval("form.inimg" + id + ".value = 'mas'");
		eval("seccion" + id + ".style.display='none'");		
		eval("form.img" + id + ".src = 'images/mas.gif'");
	}
}

function Cambiar(enlace){				
	if (ultimo!=""){
		eval(ultimo + ".style.backgroundColor='#f6f3f6'");
		eval(ultimo + ".style.borderColor='#f6f3f6'");
	}
	ultimo = enlace.id;
	eval(ultimo + ".style.backgroundColor='white'");
	eval(ultimo + ".style.borderColor='#102C6B'");
}

function Resaltar(enlace){
	if(ultimo!=enlace.id){
		eval(enlace.id + ".style.backgroundColor = 'rgb(206 207 206)'");
		eval(enlace.id + ".style.borderColor = 'rgb(156 154 156)'");
	}
}

function Restaurar(enlace){
	if(ultimo!=enlace.id){
		eval(enlace.id + ".style.backgroundColor = '#f6f3f6'");
		eval(enlace.id + ".style.borderColor = '#f6f3f6'");
	}
}
//''''''''''''''''''''''''''''''''''''''''''''''''''''''''

function LanzarSuscripcion(){
	ventana = window.open("form_suscribirse.asp","ventana","top=50,left=50,width=350,height=250");
}

function ValSuscripcion(){
	form.email.value = form.email.value.Trim();
	if ((form.email.value=="") || (!EmailCorrecto(form.email.value))){
		alert("Introduce un e-mail correcto");
		form.email.focus();
		return false;
	}
}

function Fecha(){
	var f = new Date();
	var meses = new Array('Enero','Febrero','Marzo','Abril','Mayo','Junio','Julio','Agosto','Septiembre','Octubre','Noviembre','Diciembre');
	var dias = new Array(7);
	dias[0]="Domingo";
	dias[1]="Lunes";
	dias[2]="Martes";
	dias[3]="Miercoles";
	dias[4]="Jueves";
	dias[5]="Viernes";
	dias[6]="Sabado";
	dia = f.getDate();
	dia_semana = f.getDay();
	mes = f.getMonth();
	anio = f.getYear();
	cadFecha = dias[dia_semana] + ", " + dia + " de " + meses[mes] + " de " + anio;
	return cadFecha;
}

function inStr(n, s1, s2){
	// Devuelve la posición de la primera ocurrencia de s2 en s1
	// Si se especifica n, se empezará a comprobar desde esa posición
	// Sino se especifica, los dos parámetros serán las cadenas
	var numargs=inStr.arguments.length;
	
	if(numargs<3)
		return n.indexOf(s1)+1;
	else
		return s1.indexOf(s2, n)+1;
}



//##############################################
//Funcion para validar dni
function validarDNI(dni){
/*	var digitos;
	var resto=parseInt(dni) % 23;
	var letras = "TRWAGMYFPDXBNJZSQVHLCKEF";
	letra = letras.charAt(resto);
	letra2 = digitos[dni.length-1].toUpperCase();
	if (letra2 == letra){
		if (dni.length==8){				
			dni="0"+dni;
			return true;
		}
		//document.formprofesor("nif").value=nif.substr(0,8)+letra2;
		else{
			return false;
		}
	}
*/
}