Ver Mensaje Individual
  #2 (permalink)  
Antiguo 04/03/2009, 15:17
oscardamiang
 
Fecha de Ingreso: agosto-2007
Ubicación: Victoria, Tams. México.
Mensajes: 15
Antigüedad: 16 años, 8 meses
Puntos: 0
Respuesta: como enviar un e-mail tipo html?

Espero haber entendido bien jeje... Yo hace poco hice algo parecido, enviando un mail a X destinatarios pero con un formato de HTML, pudiendo incluir imágenes, tablas y demás... Te dejo el código esperando que te sirva de algo:


<%
Set objMail = Server.CreateObject("CDONTS.NewMail")

cuerpo = cuerpo & "<HTML>"
cuerpo = cuerpo & "<BODY bgcolor='#FFEEEE'><table style=""width: 500px;"" align='center'><tr><td>"
cuerpo = cuerpo & "<P ALIGN='center' style=""font-size: 28px; font-weight: bold;"">FELIZ AÑO 2009</P>"
cuerpo = cuerpo & "<P ALIGN='center' style=""font-size: 20px; font-weight: bold;"">En TUPORTAL.COM te deseamos un año lleno de logros y alegrías.</P><br />"
cuerpo = cuerpo & "<P style=""font-size: 14px; text-align: justify; width: 500px;"">El año nuevo trae propósitos nuevos, y uno de nuestros propósitos es traerte un portal de calidad, un portal en el que el valor más grande que tiene eres tú. Es por eso que evolucionamos y hemos cambiado para ti.</P>"
cuerpo = cuerpo & "<P style=""font-size: 14px; text-align: justify; width: 500px;"">Hemos antendido cada una de tus peticiones para ofrecerte lo que tú quieres ver y como lo deseas ver... </P>"
cuerpo = cuerpo & "<P ALIGN='center'><img src=""{URL de la página de donde obtendrás la imagen}/lista.jpg"" /></P><br />"
cuerpo = cuerpo & "</td></tr></table></BODY>"
cuerpo = cuerpo & "</HTML>"

objMail.BodyFormat = 0
objMail.MailFormat = 0

objMail.From = "Quién lo envía"
objMail.To = "[email protected]"
objMail.Subject = "Te deseamos un Feliz Año 2009"
objMail.Body = cuerpo

objMail.Sendc UpEnvio '" & Rs("mail") & "'")

set objMail = nothing

response.Write("ENVIADOS")

%>