<SCRIPT LANGUAGE="JavaScript">
/* 
	JSend 2.0, Justino Martinez, 1999-2004
	http://www.webviva.com/biblioteca

	Version 2.0 Adaptacion a las nuevas exigencias de Outlook. Ahora debe verse el mail a enviar. Septiembre 2004

	Version 1.1 Añadida la opcion de gestion de campos 
	tipo "radio" y "select" Noviembre de 1999 

	Version 1.0 Rutina original 1999


	Instalacion:
	1.- Poner esta subrutina entre las directivas 
	 HEAD
	 SCRIPT LANGUAGE="JavaScript"
	y 
	 /SCRIPT
	 /HEAD
	(tal y como está en este ejemplo)
	
	2.- En el formulario el boton de envío debe llamar a esta rutina de la 
	forma
	<input type="submit" value="Enviar" onClick="JSend(this.form,'tu@direcciondema.il','Asunto','campo1','campo2')">
	Donde debe substituirse tu@direcciondema.il por la direcion de correo a la que 
	se desea enviar el formulario, Asunto por el asunto del mail y las opciones campo1, campo2, etc son los nombres de los 
	campos que se deben rellenar de forma obligatoria en el formulario para que 
	éste se envie. Pueden ponerse tantos campos como se desee separados por comas
	y entre comillas simples, por ejemplo
	onClick="JSend(this.form,'pepe@corr.eo','Mail desde mi formulario','nombre','direccion','email','telefono')">


*/

function JSend(){
var obligatorio = new Array;
var total = JSend.arguments.length;
var elformulario = JSend.arguments[0];
var asunto =JSend.arguments[2];
var accion = "mailto:"+JSend.arguments[1]+"?Subject="+escape(asunto);
var total_elementos=eval('elformulario.elements.length');
var cuerpo="";
//    var body    = sourceForm.body.value;
var enviar=true;
var k=-1;
if (total>3){
	for (var i=3;i<total;i++){
		obligatorio[i]=eval('elformulario.'+JSend.arguments[i]+'.value');
		if (!obligatorio[i]){
			k=eval('elformulario.'+JSend.arguments[i]+'.selectedIndex');
			if (k>-1){
				obligatorio[i]=eval('elformulario.'+JSend.arguments[i]+'['+k+'].value');
			} else {
				k=eval('elformulario.'+JSend.arguments[i]+'.length');
				for (var j=0;j<k;j++){
					if (eval('elformulario.'+JSend.arguments[i]+'['+j+'].checked')){
						obligatorio[i]=eval('elformulario.'+JSend.arguments[i]+'['+j+'].value');
					}
				}
			}	
		}
		if (!obligatorio[i]){
			alert("Lo siento, las respuestas al formulario no estan completas");
			enviar=false;
			break;
		}
	}
}
if ((enviar)&&(JSend.arguments[1])){ 
	for (var i=0;i<total_elementos;i++){
		nombre_campo=eval('elformulario.elements['+i+'].name');
		valor_campo=eval('elformulario.elements['+i+'].value');
		if ((nombre_campo != "")&&(valor_campo != "")){
			cuerpo+=nombre_campo+": "+valor_campo+"\n";
		}
	}
	accion+="&Body="+escape(cuerpo);
	eval('elformulario.action=accion');
}

}	
</SCRIPT>