Formato del mensaje

Rocket · #1 (**permalink**) 21/03/2002, 15:45

saludos a todos!!!

tengo este codigo en mi pagina para mandar mails

Código:

 &lt;% 
dim dir
Dim cdo
dir = Mail.Fields.Item(&quot;mail&quot;).Value
Set cdo = CreateObject(&quot;CDONTS.NewMail&quot;)
cdo.From=&quot;[email protected]&quot;
cdo.To=dir
cdo.Subject=&quot;Respuesta desde el sitio web&quot;
cdo.BodyFormat=0
cdo.MailFormat=0
cdo.Body=&quot;Hola &lt;br&gt; su actividad ha sido registrada &lt;br&gt; bla bla bla bla &lt;br&gt; bla bla bla bla &quot;
cdo.Send

Response.Write (&quot;Mensaje enviado.&lt;br&gt;&lt;br&gt;&quot;) 
%&gt;

los son los saltos de linea ke kiero ke aparescan en el mail pero no se como hacerlos.

alguien me podria hecar una mano por favor...se los agradeceris mucho

chaoooo
y gracias por su tiempo.

urjose · #2 (**permalink**) 21/03/2002, 15:54

Pues como lo pusiste esta bien...

o te marca algun error?

saludos ;)

Rocket · #3 (**permalink**) 21/03/2002, 16:43

nop, se manda bien pero tal como esta escrito, con los incluidos, sin saltos de linea.

hay otra forma de hacer los saltos de linea

saludos

mpeti · #4 (**permalink**) 21/03/2002, 16:58

Dos cositas, colocá las siguientes líneas

objNewMail.bodyformat = 0
objNewMail.mailformat = 0

luego de Set obj = CReateObject"CDONTS.NewMail")

y siempre tratá de cargar en una variable (con formato string), todo el BODY del mensaje, y luedgo mandalo de la sign manera

objNewMail.Body = nombre_de_la_variable

Espero que te sirva y suerte

(CodeMan) · #5 (**permalink**) 21/03/2002, 17:10

minimo

------------------------
Usuari@ # 16047 en los foros
El maestro del code

Mecenias · #6 (**permalink**) 22/03/2002, 04:13

Estas mezclando cosas, lo primero es que depende de como quieres enviar el mensaje, si el mensaje lo envias con formato html debe servir los , pero como veo que el mensaje que envias es en formato de texto debes añadir chr(13) que es el retorno de carro en texto y no el que es el retorno de carro para html asi:

<%
dim dir
Dim cdo
dir = Mail.Fields.Item("mail").Value
Set cdo = CreateObject("CDONTS.NewMail")
cdo.From="[email protected]"
cdo.To=dir
cdo.Subject="Respuesta desde el sitio web"
cdo.BodyFormat=0
cdo.MailFormat=0
cdo.Body="Hola" & chr(13) & " su actividad ha sido registrada " & chr(13) & " bla bla bla bla " & chr(13) & " bla bla bla bla "
cdo.Send

Response.Write ("Mensaje enviado. ")
%>

Es decir estas enviando el mensaje en formato txt y seguramente en el mensaje que envias no te funcionan los retornos de carro y ademas te escribe el literal , asi que prueba a cambiarlo como te he dicho

Saludos.

Otra forma seria:
Mensaje = ""
Mensaje = Mensaje & "Hola" & chr(13)
Mensaje = Mensaje & "Su actividad ha sido registrada " & (13)

y luego

cdo.Body= Mensaje

Saludos y dinos si te sirvio

Rocket · #7 (**permalink**) 22/03/2002, 08:11

recien llege asi ke voy a probar y les cuento