Fórum Envio de E-mail #341364
07/05/2007
0
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
Curtir tópico
+ 0Posts
07/05/2007
Saint
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
Gostei + 0
07/05/2007
Dougmelleiro
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...
Gostei + 0
07/05/2007
Massuda
Gostei + 0
08/05/2007
Dougmelleiro
Valew...
Gostei + 0
08/05/2007
Massuda
mailto:endereço-de-email?subject=assunto&body=corpo-da-mensagem&attachment="\arquivo\a\ser\anexado"
É muito mais simples se você usar o TIdSMTP do Indy ou MAPI do Windows.
Gostei + 0
08/05/2007
Dougmelleiro
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.
Gostei + 0
08/05/2007
Dougmelleiro
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.
Gostei + 0
08/05/2007
Massuda
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)