Outlook Express - (anexando arquivos)

27/12/2005

0

Olá pessoal tudo blz com vcs?


Estou fazendo o seguinte código que no momento está tudo OK!
Eu quero que o usuário ao clicar no botão de Envio já apareça os emails correspondentes, mais o assunto e o corpo da mensagem. Está tudo certinho conforme código abaixo:

procedure TfrmTarefas.btnEnviarClick(Sender: TObject);
begin
shellexecute(self.Handle, nil,
´mailto:email1@email.com.br; email2@email.com.br´+
´?subject=Envio de Dados.´+
´&Body= Assunto TESTE ´ +
´&attach=C:\Sistema\Inventario\inventario.xml´,
nil, nil, SW_NORMAL);
end;

Só que eu quero agora é que já venha pré-estabelecido o caminho do arquivo e que já apareça o mesmo já anexado na janela de Envio. Tem como fazer isso??? Pesquisei aqui no fórum e não achei algo que possa agregar a isso.

Agradeço antecipadamente

[]´s


Edibertoalves

Edibertoalves

Responder

Posts

24/05/2006

Bfbraz

Qual biblioteca preciso declarar para Shellexecute funcionar ???


Responder

24/05/2006

Adriano Santos

O mailto não suporta anexos, veja [url=http://forum.devmedia.com.br/viewtopic.php?t=59849&highlight=mailto&sid=f9c2e2f1e48554f2a546671a152263e7]neste tópico[/url]
Uma solução é usar MAPI, veja [url=http://forum.devmedia.com.br/viewtopic.php?t=68638&highlight=anexo+++email&sid=f9c2e2f1e48554f2a546671a152263e7]neste tópico.[/url]

Dá uma pesquisa no fórum sobre MailTo e MAPI, vai encontrar várias discussões.


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar