Muchas gracias por responder, a continuación pongo el código:
==============================================
<%
Dim nombre, tipo_cap, cliente, contacto, telefono, sede, fecha_ev, participantes, equipos, confirmacion, observaciones
Solicitante = request("nombre")
Tipo = request("tipo_cap")
Cliente = request("cliente")
Contacto = request("contacto")
Telefono = request("telefono")
Sede = request("sede")
Fecha = request("fecha_ev")
Participantes = request("participantes")
Eqipos = request("equipos")
Confirmado = request("confirmado")
Observaciones = request("observaciones")
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "205.134.59.251"
Mail.ContentTransferEncoding = "quoted-printable"
Mail.From = correo
Mail.FromName = nombre
Mail.AddAddress "
[email protected]"
Mail.Body = nombre & Chr(13) & Chr(10) & _
tipo_cap & _
cliente & _
contacto & _
telefono & _
sede & _
fecha_ev & _
participantes & _
equipos & _
confirmado & _
observaciones &""
On Error Resume Next
Mail.Send
If Err <> 0 Then
mensaje = "Error: " & Err.Description
else
mensaje = "enviado"
End If
Set Mail = Nothing ' Liberar recursos
txt = "resultado.asp?mensaje="&mensaje
Response.redirect txt
%>
==============================================
Espero que puedan ayudarme y reitero mi agradecimiento nuevamente.
