Ayuda Urgente - Aspemail.

[@lex]

Hola a todos,

Soy nuevo en esto de las ASP y necesito su ayuda por favor, Instalé ASPEmail y estoy haciendo un formulario que tiene 12 campos para envío por e-mail, dentro de ellos se incluye:

8 Campos de texto
1 Campo de lista de selección única
1 Campo de lista de selección múltiple
2 Check Box

El problema es que no me funciona , me envia el mail, pero llega vacio. No sé que hacer, si alguno de los expertos de este foro pudiera ayudarme estaré grandemente agradecido.

[Gurrutello]

hola
seria mas facil si pusieras el codigo que tienes
podria ser por muchas cosas una de ellas:
que no recibas los datos del formulario
que los recibas pero que no los envies
.....
.....

[@lex]

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.

[Gurrutello]

por lo que parece todo esta bien
prueba
en vez de
Tipo = request("tipo_cap")
Tipo = request.form("tipo_cap")

y todos sucesivamente.

[@lex]

Hola Gurrutello, antes que nada quiero agradecerte la amabilidad que tienes en responder a mis mensajes, realmente lo aprecio.

Ahora bien, he hecho el cambio que me sugeriste pero no funciona tampoco, mira, cuando recibo el mail aparece algo similar a esto:

Operaciones NacionalesLic. Sonia Langle55 21 05 46Oficinas Anahuac15Prueba


No aparecen todos los campos ni sus nombres y no aparece formateado. En teoria deberia aparecer así:

Solicitante: Alex McRich
Tipo de Apoyo: Comercial
Cliente: Operaciones Nacionales
etc. ...

Realmente no sé que puede estar pasando.

Cualquier sugerencia o comentario será bienvenido.

Gracias nuevamente.

[maestro]

cuerpo="cliente" & campo_nombre & vbCrLf &_
"problema" & campo_problema & vbCrLf &_
"tipo de apoyo" & campo_tipo_apoyo & vbCrLf

No estabas poniendo las constantes de texto, solo las variables que recoges del formulario, comprueba que los campos se llaman como intentas recogerlo con el REQUEST.

[@lex]

Si, van a decir que soy un ignaro y es verdad, pero Maestro, no entiendo como debo poner entonces dentro de mi código esta sugerencia que me indicas.

Sería mucha molestia si pudieras orientarme en este asunto?

Gracias por las respuestas.

[maestro]

imaginate que quieres que aparezca esto, con saltos de linea al final de cada frase:

nombre: Pedro
Apellidos: Lopez
Edad: 32
DNI: 98745632K
etc

Tendrias que ir escribiendo una cadena de texto literal "nombre", "apellido" etc y tras un espacio capturar la variable para el dato pasado por el formulario.

Esto esta sacado de la pagina de ASPEMAIL http://aspemail.com/, te vale como ejemplo pero si quieres puedes mirar alli mas cosas.

<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.smtp-server.com" ' Specify a valid SMTP server
Mail.From = "[email protected]" ' Specify sender's address
Mail.FromName = "VeryHotCakes Sales" ' Specify sender's name

Mail.AddAddress "[email protected]", "Andrew Johnson, Jr."
Mail.AddAddress "[email protected]" ' Name is optional
Mail.AddReplyTo "[email protected]"
Mail.AddAttachment "c:\images\cakes.gif"

Mail.Subject = "Thanks for ordering our hot cakes!"
Mail.Body = "nombre" & campo_nombre & vbCrLf &_
"Apellido: " & campo_apellido & vbCrLf &_
"Edad: " & campo_edad & vbCrLf &_
"DNI: " & campo_dni

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If
%>

[@lex]

Perdón por tanta molestia, ya hice lo que me indicas en tu mensaje y ya pude recibir el e-mail con el formato adecuado, pero ahora resulta que, por alguna extraña razón, algunos campos no me envía información. Este es el código que tengo:

==============================================
<%
Dim Solicitante, tipocap, cliente, contacto, telefono, sede, fechaev, participantes, equipos, confirmacion, observaciones
Solicitante = request.form("Solicitante")
Tipo = request.form("tipocap")
Cliente = request.form("cliente")
Contacto = request.form("contacto")
Telefono = request.form("telefono")
Sede = request.form("sede")
Fecha = request.form("fechaev")
Participantes = request.form("participantes")
Eqipos = request.form("equipos")
Confirmado = request.form("confirmado")
Observaciones = request.form("observaciones")
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "205.134.59.251"
Mail.ContentTransferEncoding = "quoted-printable"
Mail.From = correo
Mail.FromName = Solicitante
Mail.AddAddress "[email protected]"
Mail.Body = "Nombre:" & Solicitante & vbCrLf &_
"Tipo de Capacitación:" & tipocap & vbCrLf &_
"Cliente:" & cliente & vbCrLf &_
"Contacto:" & contacto & vbCrLf &_
"Teléfono:" & telefono & vbCrLf &_
"Sede:" & sede & vbCrLf &_
"Fecha:" & fechaev & vbCrLf &_
"Participantes:" & participantes & vbCrLf &_
"Equipos:" & equipos & vbCrLf &_
"Confirmado:" & confirmado & vbCrLf &_
"Observaciones:" & 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
%>
==============================================

Los campos indicados en rojo son los que no me regresan el valor que se introduce. Ahora bien, los campos de lista desplegable o casilla de verificación, tampoco me envían valor.

Pido perdón nuevamente por tanta molestia, pero creanme, estoy aprendiendo y espero ya no volver a molestarlos tanto.

Saludos.

[maestro]

Pues en principio parece estar bien.
¿No tendras varables globales en esa pagina con el mismo nombre que los request que hagan que se pierda el valor que viene del formulario?

¿Has comprobado que en el formulario los campos se llaman como instentas recogerlos con el request.form ?

¿tienes algun script (javascript) de comprobacion para evitar que queden campos vacios?

Si los campos son de tipo NUMERICO te vale con
REQUEST.FORM(CAMPO)
Si los campos son de tipo TEXTO te vale con
REQUEST.FORM("CAMPO")

Revisa no sea algo asi.

[@lex]

Mi estimado Maestro, solo quiero comentarte que después de varios topes en la orilla del escritorio, ... ¡¡YA ENCONTRE EL ERROR!!

Soy un verdadero zopenco, no estaba escribiendo las variables tal y como las estaba declarando al principio del código.

Ya corregí esto y por fin ha salido.

Ahora solo tengo una pregunta mas, no me odien por favor, cómo le hago para enviar copia del e-mail a otras personas.

Muchas gracias por TOOOOODO el apoyo y reciban un cordial saludo.