function validar(){
	errores=0;
    msg_error="Por favor, ingrese correctamente:\n";
	var nombre= document.fm.nombre.value;    
	var empresa=document.fm.empresa.value;
	var email=document.fm.email.value;
	var telefono=document.fm.telefono.value;
	
	if (nombre==""){
       errores++;
       msg_error=msg_error + " - Nombre \n";
    }
	if (empresa==""){
       errores++;
       msg_error=msg_error + " - Empresa \n";
    }
	
	if (telefono==""){
		errores++;
		msg_error=msg_error + " - Teléfono \n";
    }

	if (validamail(email)==false){
	      errores++;
	      msg_error=msg_error + " - E-mail \n";
    }
	
	if (errores==0){
	    xajax_prueba(xajax.getFormValues('fm'));
	}else{
	    alert(msg_error);
	    return;
	}


}


function validar_referido(){
	errores=0;
    msg_error="Por favor, ingrese correctamente:\n";
	var nombre_remite= document.fm.nombre_remite.value;    
	var email_remite=document.fm.email_remite.value;
	var nombre_ref= document.fm.nombre_ref.value;    
	var email_ref=document.fm.email_ref.value;
	var mensaje=document.fm.mensaje.value;
	
	if (nombre_remite==""){
       errores++;
       msg_error=msg_error + " - Su Nombre \n";
    }
	if (validamail(email_remite)==false){
	      errores++;
	      msg_error=msg_error + " - Su E-mail \n";
    }
	
	if (nombre_ref==""){
       errores++;
       msg_error=msg_error + " - Nombre de su amigo(a) \n";
    }
	if (validamail(email_ref)==false){
	      errores++;
	      msg_error=msg_error + " - E-mail de su amigo(a) \n";
    }
	
	if (mensaje==""){
       errores++;
       msg_error=msg_error + " - Mensaje \n";
    }
	if (errores==0){
	    document.fm.submit();

	}else{
	    alert(msg_error);
	    return;
	}


}

function validamail(mail){
   posarroba=mail.indexOf("@");
   posultpunto=mail.lastIndexOf(".");

     if ((posarroba==-1) || (posultpunto==-1))
        return(false);
     if (posultpunto-posarroba<2)
        return(false);
     if ((mail.length-1)-posultpunto<2)
        return(false);
     if ((mail.length-1)-posultpunto>3)
        return(false);
     if (posarroba<1)
        return(false);
     if (posultpunto<posarroba)
        return(false);
     
}