<!--

function fesEntero(numero)
{
	for (var i = 0; i < numero.length; i++)
		{
		var oneChar = numero.charAt(i)			
		if ((oneChar < "0" || oneChar > "9") )
			return(false)
		}
	return (true)
}

function es_fecha_valida(strfecha){
	if (strfecha.length==0) return true
	separador='/'
	formato='(dd/mm/aaaa)'
	msg='Fecha mal escrita, introduzca dia mes y año correctos: '+formato
	fechas=new Array;
	fechas=strfecha.split(separador);
	if (fechas.length!=3){
		alert(msg)
		return false
	}
	dia=fechas[0]
	mes=fechas[1]
	ano=fechas[2]
	if (!fesEntero(dia) || dia.length>2 || 
		!fesEntero(mes) || mes.length>2 ||
		!fesEntero(ano) || ano.length!=4){
		alert(msg)
		return false
	}
	dia=dia/1
	mes=mes/1
	ano=ano/1
	if (mes>12 || mes<1){
		alert(msg)
		return false
	}
	//meses de 31 dias
	if (mes==1 || mes==3 || mes==5 || mes==7 || mes==8 || mes==10 || mes==12 )
		if (dia>31 || dia<1){
			alert(msg)
			return false
		}
	//meses de 30 dias
	if (mes==4 || mes==6 || mes==9 || mes==11)
		if (dia>30 || dia<1){
			alert(msg)
			return false
		}
	//febrero
	if (mes==2){
		bisiesto=true
		division=ano/4
		division= new String (division)
		for (var j=0; j< division.length;j++)
			{
			var onePunto=division.charAt(j)
			if (onePunto==".")
				bisiesto=false
			}
		if (bisiesto==true){	
			if (dia>29 || dia<1){
				alert(msg)
				return false}
			}
		if (bisiesto==false){
			if (dia>28 || dia<1){
				alert(msg)
				return false}
			}
	}	
	if (ano<1882 || ano>2382) {
		alert ('El año de la fecha es demasiado pequeño o demasiado grande. Introduzca un año entre 1882 y 2382.')
		return false
	}

	return true;
}

// -->
