SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: border en Martes 20 de Julio de 2010, 08:09

Título: visualizar archivos msg
Publicado por: border en Martes 20 de Julio de 2010, 08:09
Buenas,

estoy realizando una aplicacion para poder usar archivos de tipo msg como plantillas. Lo que necesito hacer es abrir desde una asp un archivo msg. Para realizar esta accion uso el codigo que muestro bajao pero tengo un problema. Lo que me pasa es que en el  las imagenes del body me aparecen con un aspa roja , so imagenes embebidas. Si alguien sabe como solucionar esto....
Gracias,

<%
Dim Outlook 'Outlook Application
Dim Mail 'Email item
Dim strMsg
Dim ResultHTML

'Create a new message
Set Outlook = CreateObject("Outlook.Application")
Set Mail = Outlook.CreateItemFromTemplate("Ruta donde se encuentra el archivo ")

Response.Write Mail.To
Response.Write Mail.CC
Response.Write Mail.Subject
Response.Write Mail.HTMLBody
Set Mail = Nothing
Set Outlook = Nothing
%>