function enviar_form(tipo,frm){	
	var cadena=""
	serr=""
	for (i=0;i<document.modulos.length;i++){	
		nombre=document.modulos[i].name
		
		if ((nombre.substring(0,frm.length))==frm){
			obj=eval("document.modulos."+nombre)			
			valor=obj.value
			if (obj.type=="checkbox"){
				if (!obj.checked) valor=""			
				}
			
			
			
			if ((obj.type=="text")&&(obj.value=="")) serr=serr+nombre.substring(frm.length+1,100)+"\n"
			
			cadena=cadena+nombre.substring(frm.length+1,100)+":"+valor+"|";
			
		}
		
	}
	if (serr==""){
		enviar_form2(tipo,cadena);
		}
		else
		{
		alert("falta cargar:\n"+serr)
		}
	
}

function enviar_form2(tipo,valor){
	valor=valor.replace("<","")
	valor=valor.replace(">","")
	valor=valor.replace("'","")
	valor=valor.replace("%","")
	valor=valor.replace("=","")
	valor=valor.replace(",","")
	valor=valor.replace("\n","<br>")
var url="enviar_mail.asp?tipo="+tipo+"&mensaje="+valor+"&random="+Math.random();

	makeRequest(url,10);
}


function borrar_form(frm){	
	var cadena=""
	
	for (i=0;i<document.modulos.length;i++){	
		nombre=document.modulos[i].name
		
		if ((nombre.substring(0,frm.length))==frm){
			obj=eval("document.modulos."+nombre)			
			
			if (obj.type!="checkbox"){
				obj.value=""		
				}			
			
		}
		
	}

}

function enviar_amigo(hasta,desde,comentario,iddato,idalbum,fecha){
	if (hasta==""){
		alert("Los campos (Para) y (De) no deben quedar vacios")
	}
	else
	{
		var url="enviar_mail.asp?area="+currIdArea+"&tipo=3&mensaje="+comentario+"&desde="+desde+"&hasta="+hasta+"&id_album="+idalbum+"&id_dato="+iddato+"&random="+Math.random()+"&fecha="+fecha
		
		makeRequest(url,10);
	}
	

}