Fórum Envio de E-mail #341364

07/05/2007

0

Boa tarde pessoal, estou com urgencia em fazer que meu sistema possa enviar um email com anexo.

Já testei muitas coisas que achei aki no forun mesmo, mas nada da certo. Na hora de testar, alguns falam que deu certo, mas qdo abro meu email eu nao recebi, ou esta na minha Lixeira.

Se alguem puder me ajudar, estou precisando com urgencia.

Valew Galera.


Dougmelleiro

Dougmelleiro

Responder

Posts

07/05/2007

Saint

Se eu entendi bem voce consegue enviar o email, porem ele vai ser os anexos, certo?

para inserir os anexos faca o seguinte:

for iCountAnexo := 0 to ListBox1.Items.Count-1 do
TIdAttachment.create(mesgmessage.MessageParts, TFileName(ListBox1.Items.Strings[iCountAnexo]));

Onde:

1 -ListBox1 contem os caminhos completos dos arquivos a serem anexados;

2 - mesgmessage é o TIdMessage que contem o seu email..

só isso, espero ter ajudado, abracos


Responder

Gostei + 0

07/05/2007

Dougmelleiro

Valew...

mas nem tah enviando os email aki...

Se tiver alguma função de envio de email fica grato.

Eu estou usando temporariamente o OutLook, só que soh consigo passar o ´Para´, ´CC´, ´CCO´, ´Assunto´, ´Corpo da Msg´, gostaria de saber se tem como passar o anexo tbm...

Olhe o fonte...

StringShellExecute := StringShellExecute +
´mailto:´ + cdsClientesEMAIL.AsString +
´?cc=´ + ´´ +
´&cco=´ + ´´ +
´&subject=´ + ´[ Orçamento ]´;
ShellExecute(Self.Handle, ´open´,PChar(StringShellExecute),´´,´´,SW_SHOWNORMAL);

Grato...


Responder

Gostei + 0

07/05/2007

Massuda

...gostaria de saber se tem como passar o anexo tbm...
O mailto não suporta anexos; depende do programa de email, me parece que o Outlook (o que vem com o Office) suporta anexos no mailto, mas é um recurso só dele.


Responder

Gostei + 0

08/05/2007

Dougmelleiro

entao se o Outlook (o que vem com o Office) suporte anexos, vc sabe como posso passar o anexo ?

Valew...


Responder

Gostei + 0

08/05/2007

Massuda

Acho que era algo do tipo...
mailto:endereço-de-email?subject=assunto&body=corpo-da-mensagem&attachment="\arquivo\a\ser\anexado"
Como já disse, isso depende do programa de email.

É muito mais simples se você usar o TIdSMTP do Indy ou MAPI do Windows.


Responder

Gostei + 0

08/05/2007

Dougmelleiro

Bom testei aki e nao foi o anexo.

Já fiz alguns testes com o TIdSMTP mas deram erro e apaguei.

O MAPI do Windows eu nunca testei.

Se tiver algum exemplo que funcione com ctz com qualquer uns deles e puder me passar eu agradeço.

Valew ateh agora.


Responder

Gostei + 0

08/05/2007

Dougmelleiro

Bom testei aki e nao foi o anexo.

Já fiz alguns testes com o TIdSMTP mas deram erro e apaguei.

O MAPI do Windows eu nunca testei.

Se tiver algum exemplo que funcione com ctz com qualquer uns deles e puder me passar eu agradeço.

Valew ateh agora.


Responder

Gostei + 0

08/05/2007

Massuda

Existem vários exemplos. Pesquise o fórum por IdSMTP1 ou por MAPI. Quanto a ´dar erro´ isso é muito vago. Por exemplo, o fato de seus emails irem parar na lixeira significa que você teve sucesso ao enviar; o conteúdo da sua mensagem (que não tem nada a ver com o envio) foi classificado como spam por quem recebeu o email e isso é fora do seu controle (claro, você pode tomar alguns cuidados para minimizar isso).


Responder

Gostei + 0

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

Aceitar