// --------------------  Otras funciones
function isEmpty(s)
{ return ((s == null) || (s.length == 0))
}


function isWhitespace(s)
{ var i,rs;
  rs = false; 
  if (isEmpty(s)) rs = true; 
  for (i = 0; i < s.length; i++)
  {
    if (s.charAt(i) == " ") rs = true;
  }
  return rs;
}



// --------------------  Comprueba la validez del E-Mail
function isEMail(s)
{  if (isEmpty(s))
       if (isEMail.arguments.length == 1) return false;
       else return (isEMail.arguments[1] == true);

   if (isWhitespace(s)) return false;
   
   var i = 1;
   var sLength = s.length;

   while ((i < sLength) && (s.charAt(i) != "@"))
   { i++
   }
   if ((i >= sLength) || (s.charAt(i) != "@")) return false;
   else i += 2;

   while ((i < sLength) && (s.charAt(i) != "."))
   { i++
   }
   if ((i >= sLength - 1) || (s.charAt(i) != ".")) return false;
   else return true;   
}




// --------------------  Formulario de registro
function fmChkRegistrar() 
    {
        if (document.fmRegistrar.nombre.value == "") 
        {
        alert("Por favor, escriba su Nombre y Apellidos.");
        return false;
        }

		if (document.fmRegistrar.login.value == "") 
        {
        alert("Por favor, indique el Login (nombre de usuario o seudónimo).");
        return false;
        }
		
		if (!isEMail(document.fmRegistrar.email.value)) {
  		alert('¡La dirección de e-mail no es válida!');
		return false;
		}		
	}
	
	

// --------------------  Formulario de recomendar
function validarRecomendar()
{
 if (!isEMail(document.fmRecomendar.email2.value)) {
  alert('¡La dirección de e-mail no es válida!');
  return false;
 }
   else
   {
   alert('Gracias por recomendar esta web.\nSu e-mail se enviará en unos minutos.');
   return true;
   }
 }

 
 
// --------------------  Formulario de opinión
function fmChkOpinion() 
{       
        if (document.fmOpinion.Nombre.value == "") {
        alert("Por favor, escriba su Nombre y Apellidos.");
        return false;
        }

		if (!isEMail(document.fmOpinion.Email.value)) {
  		alert('¡La dirección de e-mail no es válida!');
		return false;
		}		
		
		if (document.fmOpinion.Comentarios.value == "") 
        {
        alert("Por favor, introduzca algún comentario u opinión.");
        return false;
        }
		
	}
	
	

// --------------------  Formulario del Foro
function fmChkForo() 
{       
        if (document.fmForo.login.value == "") {
        alert("Por favor, escriba su Nombre de Usuario.");
        return false;
        }

		if (document.fmForo.password.value == "") {
  		alert('Por favor, introduzca la Contraseña asignada.');
		return false;
		}		
		
		if (document.fmForo.mensaje.value == "") 
        {
        alert("Por favor, introduzca algún comentario u opinión.");
        return false;
        }
		
	}

	
	
	
// --------------------  Formulario de Olvido 
function fmChkOlvido() 
{       
		if (!isEMail(document.fmOlvido.email.value)) {
  		alert('¡La dirección de e-mail no es válida!');
		return false;
		}			
	}

	
	
// --------------------  Formulario del Cambio de Password
function fmChkCambia() 
{       
        if (document.fmCambia.login.value == "") {
        alert("Por favor, escriba su Nombre de Usuario (login).");
        return false;
        }

		if (document.fmCambia.password.value == "") {
  		alert('Por favor, introduzca la Contraseña actual.');
		return false;
		}		
		
		if (document.fmCambia.password1.value == "") {
  		alert('Por favor, introduzca la nueva Contraseña.');
		return false;
		}		
		
		if (document.fmCambia.password2.value == "") {
  		alert('Por favor, repita la nueva Contraseña.');
		return false;
		}		
		
	}


