Bueno, muy buenas tardes a todos, supongo que de repente puede ser un poco obvia mi pregunta pero para mi mala suerte no se ven los estilos al email que envio por correo... y la verdad no se por que no salen.
Si cuando pongo la pagina que se envía en un navegador se ve excelente, pero al outtlook llega una desgracia, también he probado con el servidor hotmail hay se muestran algunos estilos pero no todos.
Antes de que respondan en vano, aclaro que he probado poniendo el css en rutas absolutas, es decir el archivo css esta colgado en el servidor y tampoco; lo he puesto en la misma cadena de envió pero igual no se llega a mostrar adecuadamente.
Les adjunto mi codigo asp
Código ASP:
Ver original<%
sch = "http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(sch & "sendusing") = 2 ' cdoSendUsingPort
.Item(sch & "smtpserver") = "mail.mydominio.com"
.update
End With
function iif(psdStr, trueStr, falseStr)
if psdStr then
iif = trueStr
else
iif = falseStr
end if
end function
Dim objetoMail
Set objetoMail = Server.CreateObject ( "CDO.Message" )
if request.form("FullName")<>"" then
ok = true
else
ok = false
end if
if ok then
' Creamos el objeto email
Set objetoMail.Configuration = cdoConfig
' Configuramos el email
'objetoMail.MailFormat = cdoMailFormatMIME
objetoMail.Subject = "Contact Us "
'objetoMail.BodyFormat = cdoBodyFormatHTML
'objetoMail.contentBase="http://www.mydominio.com/Peru"
sMsgHTML ="<html xmlns=http://www.w3.org/1999/xhtml><head><meta http-equiv=Content-Type content=text/html; charset=utf-8 /><title>by TheDark03</title><style>table{width:400px;background:#f0f0f0;font-family:verdana;font-size:11px;} table span{display:block;font-family:verdana;font-size:14px;color:#666666;font-weight:bold;text-align:center;background:#FFFFFF;padding:5px;} table td{width:200px;} table td.caption{width:200px;color:#666666;font-weight:bold;;padding:3px;}</style></head><body><br> <table width='400' border='1' cellpadding='0' cellspacing='0' bordercolor='#666666' background='#ddd'>"
sMsgHTML=sMsgHTML+"<tr> <td colspan='2'><div align='center'><img src='http://www.amazingperu.com/images/logocontact.jpg' ></div></td> </tr>"
sMsgHTML=sMsgHTML+"<tr> <td colspan='2'><span>CONTACT US</span></td></tr>"
'Split("VBScriptXisXfun!", "x", -1, 1)
'FullName,Email,Country,PhoneNumber,Address,WheredidYouhearAboutus,SuscribeNewsletter,QuestionsAndRequests
fmdatos=Split("FullName,Email,Country,PhoneNumber,Address,WheredidYouhearAboutus,QuestionsAndRequests",",",-1,1)
for each d in fmdatos
sMsgHTML = sMsgHTML+" <tr> <td class='caption'>"&d&"</td><td>"&Request.Form(d)&" </td></tr> "
next
sMsgHTML = sMsgHTML+" <tr> <td class='caption'>Date Contact</td><td>"&now&" </td></tr> "
sMsgHTML =sMsgHTML+"</table></body></html> "
objetoMail.htmlBody = sMsgHTML
' Enviamos el email
objetoMail.Send
' Destruimos el objeto email
end if
Set objetoMail = Nothing
%>
Espero que me puedan ayudar. Gracias ante todo!
Saludos DLB