<!--
function PrintDate() {
	var days = ["Domingo","Lunes","Martes","Miercoles","Jueves","Viernes","Sabado"];
	var months = ["Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre"];
	
	var dateObj=new Date()
	var wday=days[dateObj.getDay()]
	var lmonth=months[dateObj.getMonth()]
	var date=dateObj.getDate()
	var fyear=dateObj.getFullYear()
	document.write(wday+", "+date+" de "+lmonth+" de "+fyear);
}

function EMailCheck(str) {
  var at="@"
  var dot="."
  var lat=str.indexOf(at)
  var lstr=str.length
  var ldot=str.indexOf(dot)

  /*
   * Si no se encuentra el caracter '@', o la @ es el primer/ultimo caracter
   * entonces la dirección de e-mail es incorrecta.
   */
  if (lat == -1 || lat == 0 || lat == lstr) return false;
    
  /*
   * Idem con '.'.
   */
  if (ldot == -1 || ldot == 0 || ldot == lstr) return false;

  /*
   * Si hay mas de una '@' -> Error.
   */
  if (str.indexOf(at,(lat+1)) != -1) return false;

  /*
   * Si '.@' o '@.' o '.@.' -> Error.
   */
  if (str.substring(lat-1,lat) == dot || str.substring(lat+1,lat+2) == dot)
    return false;

  /*
   * Si el nombre del dominio no es válido...
   */
  if (str.indexOf(dot,(lat+2)) == -1) return false;
		

  /*
   * Si hay caracteres inválidos.
   */
  if (str.indexOf(" ") != -1) return false;

  /*
   * Y si hemos llegado hasta aqui, todo de p.madre.
   */
  return true					
}

-->
