POR HTM COM IMAGEM NO CORPO DO EMAIL VIA OUTLOOK

USUARIO.EXCLUIDOS 05/07/2007 11:57:46
#224793
Olá,

Estou tentando colocar uma rotina de envio de email em meu programa direto para o outlook, só que preciso colocar um html como papel de parede com imagem, não estou conseguindo fazer a imagem aparecer no lugar certo, será que alguem poderia me ajudar ?

A imagem aparece anexada, mas não aparece no corpo do email.

Segue abaixo o código

Private Sub Command1_Click()
     Dim m_outlook As Object
     Dim msg As Object
     Set m_outlook = CreateObject("Outlook.Application")
     Set msg = m_outlook.CreateItem(olMailItem)
     msg.To = "destino@destino.com.br"
     msg.Subject = "Título"
     msg.Attachments.Add "D:\VB\Testes\Email no Outlook\ajuda.gif", olByReference, 1
     msg.HTMLBody = "<html><body><p><font color='#0000FF'>teste<img border='0' src='ajuda.gif' width='40' height='40'></font></p></body></html>"
     msg.Display
End Sub
USUARIO.EXCLUIDOS 05/07/2007 12:22:41
#224802


Papel de parede vc faz assim:

<body background="path da imagem">

veja se da certo!1

boa sorte
USUARIO.EXCLUIDOS 05/07/2007 14:48:10
#224843
Olá Sinkertec,
Na verdade não é isso que eu quero, tenho um html com uma imagem, preciso colocar o html como papel de parede no email de forma que o htm apareça junto com a imagem, como o outlook faz quando você seleciona um novo papel de parede, eu só preciso saber a sintaxe de .attachments para que o outlook entenda que a imagem que está em anexo tem que ser colocada dentro do htm, eu já fiz isso com CDO, você utiliza .AddRelatedBodyPart para referenciar a imagem, só não estou conseguindo encontrar um comando similiar.

Obrigado pela ajuda.
Tópico encerrado , respostas não são mais permitidas
Voltar