Enviar e-mail de Relatorio gerado???
Preciso enviar um e-mail do relatorio gerado em meu programa?
o relatorio é feito em RAVE REPORTS!
se nao tiver jeito como faço para enviar chamar um e-mail pelo delphi e anexar o meu relatorio salvo(HTML, RTF, TXT, etc...)?? :cry:
o relatorio é feito em RAVE REPORTS!
se nao tiver jeito como faço para enviar chamar um e-mail pelo delphi e anexar o meu relatorio salvo(HTML, RTF, TXT, etc...)?? :cry:
Fred
Curtidas 0
Respostas
Krakhecke
21/10/2003
Estou com o mesmo problema, já consegui gerar o email, mas não consegui anexar o arquivo.
A linha de anexar o arquivo não funciona.
Se conseguir mande uma resposta.
Procedure xxx
var Mail : String;
begin
Mail := ´mailto: marcelogk@xxx.com.br´+
´?subject= Revisao Efetivada´+//´&Body= teste´+´¬0D0A´+
´&AttachFilePath=C:\RevisaoEfetivada.PDF´;
ShellExecute(GetDesktopWindow,´open´,pchar
(Mail),nil,nil,sw_ShowNormal);
end;
A linha de anexar o arquivo não funciona.
Se conseguir mande uma resposta.
Procedure xxx
var Mail : String;
begin
Mail := ´mailto: marcelogk@xxx.com.br´+
´?subject= Revisao Efetivada´+//´&Body= teste´+´¬0D0A´+
´&AttachFilePath=C:\RevisaoEfetivada.PDF´;
ShellExecute(GetDesktopWindow,´open´,pchar
(Mail),nil,nil,sw_ShowNormal);
end;
GOSTEI 0