<%Server.ScriptTimeOut = 10000%> Untitled Document <% Dim objMail set objMail = CreateObject("CDO.Message") objMail.From = "formacion@edex.es" objMail.To = "formacion@edex.es" objMail.Subject = "Solicitud Bizitzarako Trebetasunak - Habilidades para la Vida" strUrl = "http://www.edex.es/mailing/habilidades_para_la_vida_salud/formulario.asp?municipio=" & request.Form("municipio") 'strUrl = "http://localhost:98/mailing/habilidades_para_la_vida_salud/formulario.asp?municipio=" & request.Form("municipio") strUrl = strUrl & "&tecnico="&request.Form("tecnico") strUrl = strUrl & "&direccion="&request.Form("direccion") strUrl = strUrl & "&telefono="&request.Form("telefono") strUrl = strUrl & "&email="&request.Form("email") strUrl = strUrl & "¢ros_participan="&request.Form("centros_participan") strUrl = strUrl & "&numero_profesores="&request.Form("numero_profesores") strUrl = strUrl & "&fecha="&request.Form("fecha") objMail.CreateMHTMLBody strUrl 'response.write(strUrl) objMail.send Response.redirect("ok.html") 'response.redirect strUrl %>