Ver Mensaje Individual
  #1 (permalink)  
Antiguo 17/07/2006, 09:52
llanesluna
Usuario no validado
 
Fecha de Ingreso: mayo-2006
Mensajes: 113
Antigüedad: 18 años, 11 meses
Puntos: 0
Agregar estilos a un Html mail.

hola, tengo la siguiente configuración:

<%
Para = request("Para")
CC = request("CC")
Asunto = request("Asunto")
Cuerpo = request("Cuerpo")
%>
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject = Asunto
myMail.From = "[email protected]"
myMail.To = "[email protected]"
myMail.CC = CC
myMail.HtmlBody= Cuerpo + session("textbody")
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="mySMTPserver"
'Server port
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
myMail.Configuration.Fields.Update
myMail.Send
set myMail = nothing
%>

Funciona ok, sin problemas, solo el detalle de q necesito q se incluya el estilo con el q se envia, es posible esto?
Salu2