Ir ao conteúdo
  • Cadastre-se
renannsoares

Access vba - imagem no corpo do e-mail

Recommended Posts

Bom dia Pessoal, gostaria de esclarecer uma dúvida no VBA, o código a baixo envia o e-mail , porém não está enviando com a imagem no corpo do e-mail! Vocês conseguem me ajudar?

Obs: é um banco access com uma imagem que eu pego no arquivo do computador, quando eu comecei a fazer o código a ideia seria pegar um relatório do access e colar no corpo do e-mail como imagem, mas não consegui desenvolver o código!

 

Private Sub SeuBotao_Click()
Dim rst As DAO.Recordset
Dim strDestinatarios
Dim strTitulo
Dim strMensagemCorpoDoEmail

Set rst = CurrentDb.OpenRecordset("Con_email")

Do Until rst.EOF
strDestinatarios = strDestinatarios & rst("e-mail") & ";"
rst.MoveNext
Loop

strDestinatarios = Left(strDestinatarios, Len(strDestinatarios) - 1)
strTitulo = "Faturas Wappa à vencer"

strMensagemCorpoDoEmail = "www.xxx.com.br" & vbCrLf & _
        "xxxxxxxx" & vbCrLf & _
strMensagemCorpoDoEmail = "<img src=cid C:\Users\xxxxx.PNG>"

Compartilhar este post


Link para o post
Compartilhar em outros sites

Para a imagem carregar no corpo do email, voce precisa subir a imagem, e hospedar em algum site.

É assim que funciona quando voce recebe algum email promocional, que tem a opção de voce carregar a imagem ou não.

 

Quanto ao relatorio,,voce pode inserir este relatorio no excel e enviar o intervalo no corpo do email  

 

https://support.microsoft.com/en-us/kb/816644

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×