testes de envio de email
17 views
Skip to first unread message
Diomedes Amparo
6:49 AM (9 hours ago) 6:49 AM
to Harbour Minigui
olá amigos
bom dia
estou fazendo um teste de envio do e-mail conforme instruções abaixo, o e-mail esta sendo enviado normalmente porem a linha que inclui a IMAGE não é recebido pelo destinatário, no outlook na minha maquina aparece perfeitamente mas os destinatários a imagem não aparece, se o destinatário utiliza o outlook aparece um quadrado com um X se o destinatário utiliza um webmail qualquer simplesmente não aparece nada.
alguém saberia me dizer pq? segue abaixo as instruções que uso.
abraços Amparo
oOutLook := CreateObject("Outlook.Application")
oMail := oOutLook:CreateItem(0)
oRecip := oMail:Recipients
oRecip:Add( ALLTRIM( LOWER( EMAIL_CLI ) ) )
oMail:Subject := "testando envio de e-mail"
CBody := '<!DOCTYPE html> ' + QUEBRA
CBody += '<html lang="pt-br"> ' + QUEBRA
CBody += ' <head> ' + QUEBRA
CBody += ' <meta charset="utf-8"> ' + QUEBRA
CBody += ' </head> ' + QUEBRA
CBody += ' <body> ' + QUEBRA
CBody += 'Prezado,<br><br>'
CBody += 'Segue em anexo ' + IIF( CHK_XML, "XML, ",'' ) + IIF( CHK_DANFE,"DANFE,",'' ) +;
IIF( CHK_BOLETO .AND. LEN( DUPLI_EMAIL ) > 0, "BOLETO(S)",'' ) + ' da NFe de numero ' + NUMERO_NFE + '<br><br>'
CBody += 'Qualquer Duvida favor entrar em contato.<br><br><br><br>'
CBody += 'AT.:<br>'
CBody += ' <img src="' + PASTA_FOTOS + aUser[US_ASS_EMAIL] + '"><br>'
oMail:HTMLBody := CBody
oMail:Send()
bom dia
estou fazendo um teste de envio do e-mail conforme instruções abaixo, o e-mail esta sendo enviado normalmente porem a linha que inclui a IMAGE não é recebido pelo destinatário, no outlook na minha maquina aparece perfeitamente mas os destinatários a imagem não aparece, se o destinatário utiliza o outlook aparece um quadrado com um X se o destinatário utiliza um webmail qualquer simplesmente não aparece nada.
alguém saberia me dizer pq? segue abaixo as instruções que uso.
abraços Amparo
oOutLook := CreateObject("Outlook.Application")
oMail := oOutLook:CreateItem(0)
oRecip := oMail:Recipients
oRecip:Add( ALLTRIM( LOWER( EMAIL_CLI ) ) )
oMail:Subject := "testando envio de e-mail"
CBody := '<!DOCTYPE html> ' + QUEBRA
CBody += '<html lang="pt-br"> ' + QUEBRA
CBody += ' <head> ' + QUEBRA
CBody += ' <meta charset="utf-8"> ' + QUEBRA
CBody += ' </head> ' + QUEBRA
CBody += ' <body> ' + QUEBRA
CBody += 'Prezado,<br><br>'
CBody += 'Segue em anexo ' + IIF( CHK_XML, "XML, ",'' ) + IIF( CHK_DANFE,"DANFE,",'' ) +;
IIF( CHK_BOLETO .AND. LEN( DUPLI_EMAIL ) > 0, "BOLETO(S)",'' ) + ' da NFe de numero ' + NUMERO_NFE + '<br><br>'
CBody += 'Qualquer Duvida favor entrar em contato.<br><br><br><br>'
CBody += 'AT.:<br>'
CBody += ' <img src="' + PASTA_FOTOS + aUser[US_ASS_EMAIL] + '"><br>'
oMail:HTMLBody := CBody
oMail:Send()
Vlademiro Landim
6:56 AM (9 hours ago) 6:56 AM
to Diomedes Amparo, Harbour Minigui
Qual é o conteúdo de PASTA_FOTOS ?
--
Visit our website on https://www.hmgextended.com/ or https://www.hmgextended.org/
---
You received this message because you are subscribed to the Google Groups "Harbour Minigui" group.
To unsubscribe from this group and stop receiving emails from it, send an email to minigui-foru...@googlegroups.com.
To view this discussion, visit https://groups.google.com/d/msgid/minigui-forum/9cb85608-d5d6-46fb-ac88-f2aed0714558n%40googlegroups.com.
Diomedes Amparo
7:22 AM (9 hours ago) 7:22 AM
to Harbour Minigui
olá amigos
é uma foto arquivo PNG
é uma foto arquivo PNG
Abraço
Amparo
Amparo
Diomedes Amparo
7:26 AM (9 hours ago) 7:26 AM
to Harbour Minigui
olá amigos
bom dia
só complementando a linha tem a seguinte informação
"C:\primordi\fotos\minha_assinatura.png"
bom dia
só complementando a linha tem a seguinte informação
"C:\primordi\fotos\minha_assinatura.png"
Vlademiro Landim
9:22 AM (7 hours ago) 9:22 AM
to Diomedes Amparo, Harbour Minigui
Por isso não funciona. Vc precisa fazer o upload no ato do envio do e-mail. Eu não tenho esses comandos aqui para te passar mas está claro que a causa é porque o destino não está achando a imagem que está hospedada no computador da origem.
Consulte a documentação para ver como faz. Eu não tenho nada aqui com Outlook, mas a causa do problema é essa.
To view this discussion, visit https://groups.google.com/d/msgid/minigui-forum/b51f154f-f236-4ff6-9de7-7c7ccfb6aac2n%40googlegroups.com.
Vlademiro Landim
9:28 AM (7 hours ago) 9:28 AM
to Diomedes Amparo, Harbour Minigui
Achei esse exemplo aqui nos fontes do harbour:
core/contrib/hbwin/tests/mapimail.prg at master · harbour/core · GitHub
Diomedes Amparo
10:17 AM (6 hours ago) 10:17 AM
to Harbour Minigui
olá amigos
boa tarde
Vlademiro, obrigado
vou fazer uns testes aqui
abraço
Amparo
boa tarde
Vlademiro, obrigado
vou fazer uns testes aqui
abraço
Amparo
Reply all
Reply to author
Forward
0 new messages