// Copyright (C) 2003 webeditions.net, S.L.
// http://www.webeditions.net

<!--
var nav = (navigator.appName == "Microsoft Internet Explorer") ? "ie" : "ns";
ns4 = (document.layers)? true:false
ie4 = (document.all)? true:false



function enviar()
{
document.forms[0].email.value=document.forms[0].mail.value;            
        if ( comprobar() ) {
				document.datos.method = "POST";
                document.datos.action = "http://cgi.biocop.es/FormMail.pl";
                document.datos.submit();
        }
}

function comprobar(){
        if (document.forms[0].mail.value.indexOf('@',0)==-1) { errormail(document.forms[0].mail); return (false); }
        if (document.forms[0].mail.value.indexOf('.',0)==-1) { errormail(document.forms[0].mail); return (false); }
        if (document.forms[0].mail.value=="") { cambiamail(document.forms[0].mail); return (false); }
        if (document.forms[0].Nombre.value=="") { nonom(document.forms[0].Nombre); return (false); }
return true;
}
<!--
function errormail(lugar){
        alert("la dirección de e-mail es incorrecta");
        lugar.focus();
}

function cambiamail(lugar){
        alert("Por favor, es necesario que escriba su direccion e-mail.");
        lugar.focus();
}

function nonom(lugar){
        alert("El nombre de la persona de contacto es requerido.");
        lugar.focus();
}

// -->