Bueno me alegra haberte podido ayudar!
Con respecto a lo que en un principio no te funcionó, es porque primero tenés que asignarle los valores a cuerpo así:
Código:
' Le das los valores a "cuerpo"
Cuerpo = "ZZZZZZZZZ" & VbCrLf & VbCrLf
Cuerpo = Cuerpo & "Nombre " + " : " & Request.form("nom") & VbCrLf
Cuerpo = Cuerpo & "Domicilio " + " : " & Request.form("domicili") & VbCrLf
Cuerpo = Cuerpo & "email " + " : " & Request.form("email") & VbCrLf
Cuerpo = Cuerpo & "PRODUCTO " + " : " & Request.form("select1") & VbCrLf
' Luego le asignas a Mailer.BodyText el valor de Cuerpo
Mailer.BodyText = Cuerpo
Fijate que la primera linea no tiene "Cuerpo" después del igual, recien en la segunda linea se pone "Cuerpo &" ... esto es porque en la primera linea recién se le está dando valores a Cuerpo, y lo que se hace en la segunda y las subsiguientes lineas es sumarle a Cuerpo otros valores con el operador "&".
Si no ponés en las siguientes lineas el valor Cuerpo y lo concatenas con & a los demás valores, cuerpo se va a redefinir y te va a mostrar solo las últimos valores que le asignaste.
Explicandote masomenos lo que vos pusiste:
Código:
Mailer.BodyText = Cuerpo
Mailer.Bodytext = Cuerpo & "ZZZZZZZZZ" & VbCrLf & VbCrLf
Mailer.Bodytext = Cuerpo & "Nombre " + " : " & Request.form("nom") & VbCrLf
Mailer.Bodytext = Cuerpo & "Domicilio " + " : " & Request.form("domicili") & VbCrLf
Mailer.Bodytext = Cuerpo & "email " + " : " & Request.form("email") & VbCrLf
Mailer.Bodytext = Cuerpo & "PRODUCTO " + " : " & Request.form("select1") & VbCrLf
En la primera linea donde vos pusiste "Mailer.BodyText = Cuerpo" lo que hiciste es asignarle a "Mailer.BodyText" el valor 0, puesto que "cuerpo" hasta el momento no tiene ningun valor.
No se la verdad que se ma hace que así como pusiste no te debería funcionar, pero si te funciona bien, pero te recomiendo que pongas de la manera en la que te expliqué arriba.
Saludos
