Ir para conteúdo
  • Cadastre-se

dev botao

anexos acbremail


Ver Solução Respondido por Daniel Simoes,
  • Este tópico foi criado há 1812 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

bom dia amigos

estou tentando melhorar a minha rotina de envio de email e esta dando certo, porem estou com duvida para o envio dos arquivos em anexo, pois criei um listbox para que o usuario inseria quantos anexos for necessarios, mas nao sei com fazer com que o componente aceite todos itens do listbox, alguem pode me explicar como fazer que possa enviar independete do tipo de arquivo em anexo

 

obrigado

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia.

Veja este trecho adaptado do demo(Em lazarus)

     ListaAnexos.First;
      while not(ListaAnexos.EOF) do
      begin
        AddAttachment(ListaAnexos.Fields[1].AsString,dm.tbAnexos.Fields[2].AsString);
        ListaAnexos.Next;
      end;  

Att.

  • Curtir 2
Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • Fundadores
  • Solution

Você pode fazer um Loop.. e ir adicionando os anexos...

 ACBrMail1.AddAttachment(Dir+NomeArquivo, 'Descricao do Anexo', adAttachment); 

 

  • Curtir 2
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1812 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.