Holas, tengo un server 2003 q usa el cdo para enviar mails, quisiera mandar a mis clientes el newsletter pero quisiera saber como se puede mandar ocn un diseño de un html, con los datos jalados por base de datos??
Set objmensaje= Server.CreateObject("CDO.Message")
set iConf = Server.CreateObject("CDO.Configuration")
set Flds = iConf.Fields
Flds("
http://schemas.microsoft.com/cdo/con...tion/sendusing") = 1
Flds("
http://schemas.microsoft.com/cdo/con...ickupdirectory") = "c:\\inetpub\\mailroot\\pickup"
Flds.Update()
objmensaje.Configuration = iConf
ObjMensaje.from = "
[email protected]" 'correo que envia
ObjMensaje.To = "
[email protected]" ' a donde debe llegar el correo
ObjMensaje.Subject = "web at com ' titulo
'******************
cad1="Nombres : " & nombre
cad2="Apellidos: " & apellidos
cad3="Telefono : " & telefono
cad4="Fecha de nacimiento: " & fecha
cad5="Dirección : " & direccion
cad6="Servicios" & servicios
cad7="Email: " & email
cad8="Distrito: " & distrito
cad9="Departamento: " & departamento
cad10="Pais: " & pais
'********************
ObjMensaje.TextBody = cad1 & Vbcrlf & cad2 & Vbcrlf & cad3 & Vbcrlf & cad4 & Vbcrlf & cad5 & Vbcrlf & cad6 & Vbcrlf & cad7 & Vbcrlf & cad8 & Vbcrlf & cad9 & Vbcrlf & cad10
ObjMensaje.Send()
Set ObjMensaje = Nothing
%>