var fecha =new Date();
		dia = fecha.getDate();
		dias=fecha.getDay();
		mes= fecha.getMonth();
		anyo=fecha.getYear();
	
		if (mes==0) mess="Enero";
		else if(mes==1) mess="Febrero";
		else if(mes==2) mess="Marzo";
		else if(mes==3) mess="Abril";
		else if(mes==4) mess="Mayo";
		else if(mes==5) mess="Junio";
		else if(mes==6) mess="Julio";
		else if(mes==7) mess="Agosto";
		else if(mes==8) mess="Septiembre";
		else if(mes==9) mess="Octubre";
		else if(mes==10) mess="Noviembre";
		else mess="Diciembre";
	
		if (dias==1) diass="Lunes";
		else if(dias==2) diass="Martes";
		else if(dias==3) diass="Miercoles";
		else if(dias==4) diass="Jueves";
		else if(dias==5) diass="Viernes";
		else if(dias==6) diass="Sabado";
		else diass="Domingo";
		fecha_l=diass+", "+dia+" de "+mess+" del "+anyo
				
function verificacorreo(correo)
{
if (correo.length < 6)
{
alert('La dirección de correo es incorrecta');
return false;
}
var i;
var parte;
var ok = true;
var tablaascii ="0123456789-_.abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
var punto = correo.lastIndexOf(".");
var arroba = correo.indexOf("@");
var correo1 = correo.toLowerCase();
if (arroba == -1) { alert('La dirección de correo es incorrecta');return false; }
if (punto == -1) { alert('La dirección de correo es incorrecta');return false; }

parte = correo.substring(0,arroba);
for (i=0;i<parte.length;i++)
{
	if (tablaascii.indexOf(parte.charAt(i)) == -1)
 	{
 	ok = false;
 	break;
 	}
}
if (!ok) { alert('La dirección de correo es incorrecta');return false; }

parte = correo.substring(1+arroba, punto);
for (i=0;i<parte.length;i++)
{
	if (tablaascii.indexOf(parte.charAt(i)) == -1)
 	{
 	ok = false;
 	break;
 	}
}
if (!ok) { alert('La dirección de correo es incorrecta'); return false; }

parte = correo.substring(1+punto, correo.length);
if ((parte.length >=2) && (parte.length<=3))
{
	for (i=0;i<parte.length;i++)
	{
		if (tablaascii.indexOf(parte.charAt(i)) == -1)
 		{
 		ok = false;
 		break;
 		}
	}
	if (!ok) { alert('La dirección de correo es incorrecta'); return false; }	
}
else
{
	alert('La dirección de correo es incorrecta');
	return false;
}
return true
}

function vcorreo(correo)
{
var i;
var parte;
var ok = true;
var tablaascii ="0123456789-_.abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
var punto = correo.lastIndexOf(".");
var arroba = correo.indexOf("@");
var correo1 = correo.toLowerCase();
if (arroba == -1) { return false; }
if (punto == -1) { return false; }

parte = correo.substring(0,arroba);
for (i=0;i<parte.length;i++)
{
	if (tablaascii.indexOf(parte.charAt(i)) == -1)
 	{
 	ok = false;
 	break;
 	}
}
if (!ok) { return false; }

parte = correo.substring(1+arroba, punto);
for (i=0;i<parte.length;i++)
{
	if (tablaascii.indexOf(parte.charAt(i)) == -1)
 	{
 	ok = false;
 	break;
 	}
}
if (!ok) { return false; }

parte = correo.substring(1+punto, correo.length);
if ((parte.length >=2) && (parte.length<=4))
{
	for (i=0;i<parte.length;i++)
	{
		if (tablaascii.indexOf(parte.charAt(i)) == -1)
 		{
 		ok = false;
 		break;
 		}
	}
	if (!ok) { return false; }	
}
else
{
	return false;
}
return true
}




function longcero(entrada)
{
 if (entrada.length <=0 )
 {
 alert ('Imposible continuar con la operacion. \nNo ha introducido ningun valor...');
 return false;
 }
 else
 {
 return true;
 }
}