Ir para conteúdo
  • Cadastre-se

dev botao

AcbrMail ao enviar o executável para de funcionar


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

Recommended Posts

  • Membros Pro
Postado (editado)

Bom dia a todos,

Não estou conseguindo enviar email pelo meu executável, sempre aparece a mensagem conforme o arquivo em anexo. Trava sempre quando envia. No Exemplo ele envia sem problemas com as mesmas propriedades. O componente está atualizado até 14/01/2016 no trunk2.

Segue valores das propriedades:

    ACBrMail.Clear;
    ACBrMail.IsHTML := false;
    ACBrMail.From := 'aqui coloco o email';
    ACBrMail.FromName := 'jean';
    ACBrMail.Host := 'smtp.mail.yahoo.com';
    ACBrMail.Username := 'aqui coloco o email de origem';
    ACBrMail.Password := 'senha do email de origem';
    ACBrMail.Port := '587'; 
    ACBrMail.SetTLS := false;
    ACBrMail.AddAddress('email de destino', 'destinatario jean');
    AcbrMail.AltBody.Add('Notas fiscais eletrônicas compactadas em anexo.');
    AcbrMail.Subject := 'teste subject';
    AcbrMail.Send(false);

Alguém tem idéia do que pode ser?

parou de funcionar.png

Editado por jean_peixoto
  • Membros Pro
Postado

Pois é Juliomar, genérica mesmo!

Uso os arquivos ssleay32.dll e libeay32.dll na mesma pasta do executável e na versão 0.9.8.14.

Já testei também na versão 0.9.8.1.

Algo que não coloquei na minha primeira mensagem é que  ACBrMail.SetSSL := true.

Debugando, verifiquei que ele dá esse problema na linha 636 do arquivo AcbrMail, conforme imagem abaixo.

parou.png

  • Membros Pro
Postado

Bom dia Juliomar, obrigado pela atenção!

Ainda estou com o mesmo problema!

Sim, tenho meus fontes atualizados e recompilados.  Atualizado em 14/01/2016, trunk2.

Estou instalando em outra máquina pra ver se ocorre o mesmo problema.

Assim que fizer o teste posto aqui o resultado.

Obrigado

  • Curtir 1
  • Membros Pro
Postado

Instalei em outro computador e aconteceu o seguinte:

1 - Quando estou executando o programa pelo delphi ele trava do mesmo jeito, dando a mensagem que o sistema parou de funcionar

2 - Quando abro direto pelo executável ele não dá o problema.

Em ambas as situações ele envia o e-mail.

No primeiro computador ele não envia de nenhum jeito e trava de qualquer uma das formas que executo o sistema.

  • Moderadores
Postado

Olha pelo seu relato pode ser algumas situações por exemplo outros componentes que use e esteja travando!

ou dll que esteja sendo usada pelo delphi já e dai sua aplicação vai usar uma diferente!

faz um teste, manda executar o seu delphi como administrador e dai roda a aplicação!

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado

Bom dia, 

 

estou com o mesmo problema,   o acbr envia o email, mas ttrava o meu sistema, ou seja demora para retornar da função.

no acbrmail nao achei a propriedade de tempo de espera para alterar, acho que esta relacionado com isto

faço o envio do email e demora de 3 a 4 minutos para retornar da função, dando a impressão que o sistema esta travado.

 

  • Moderadores
Postado
3 minutos atrás, centuryinf disse:

Bom dia, 

 

estou com o mesmo problema,   o acbr envia o email, mas ttrava o meu sistema, ou seja demora para retornar da função.

no acbrmail nao achei a propriedade de tempo de espera para alterar, acho que esta relacionado com isto

faço o envio do email e demora de 3 a 4 minutos para retornar da função, dando a impressão que o sistema esta travado.

 

Acontece o mesmo se usar o exemplo do svn? as dll estão corretas?

sua net e seu provedor são razoáveis?

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado

Juliomar note , atualizei as dlls e continuou demorando, 

abri meu outlook e ja estava recebendo o email e o sistema ainda esta parado.

mudei a propriedade   acbrmail.attempts:=1      // antes estava 3  diminuiu para 2 minutos

mas ainda esta lento, nao sei se esta propriedade tem a ver

 

 

  • Membros Pro
Postado

Não consegui resolver o meu também! Cheguei a excluir e incluir novamente! Fiz a atualização das dll e do componente. 

Centuryinf vc chegou a testar em mais de uma máquina? Fiz os testes no Win7 e trava sempre. Não fiz o teste em outras versões do windows.

Estou tentando descobrir, se tiver novidades posto aqui!

Postado

Ola Jean

testei em varias maquinas, todos os clientes que estou atualizando a nfe, esta dando este problema de lentidão e travando

em um cliente até resetei o roteador e re-configurei tudo mas não resolveu

 

  • Membros Pro
Postado

Bom dia Centuryinf,

Eu também estou do mesmo jeito ainda, está dando o mesmo problema onde quer que eu coloque o executável. Não desisti, mais está ficando sem muita opção pra eu achar onde está esse problema. Estou usando os parametros a seguir para enviar o email:

    ACBrMail.Clear;
    ACBrMail.IsHTML := false;
    ACBrMail.From := 'aqui coloco o email';
    ACBrMail.FromName := 'jean';
    ACBrMail.Host := 'smtp.mail.yahoo.com';
    ACBrMail.Username := 'aqui coloco o email de origem';
    ACBrMail.Password := 'senha do email de origem';
    ACBrMail.Port := '587'; 
    ACBrMail.SetTLS := false;
    ACBrMail.AddAddress('email de destino', 'destinatario jean');
    AcbrMail.AltBody.Add('Notas fiscais eletrônicas compactadas em anexo.');
    AcbrMail.Subject := 'teste subject';
    AcbrMail.Send(false);

Quais parametros vc utiliza?

Postado

eu utilizo a base do demo do acbr

 

  ACBrNFe1.NotasFiscais.Clear;

    para:=trim(table3email.value);
    CC:=TstringList.Create;
    try
    CC.add(trim(edtCC.text));
    assunto:='Nota Fiscal Eletronica';
    arqemail:=' NFe - '+floattostr(table3fatura.value);
    edtemailassunto.text:=assunto+arqemail;
    xcomple:=trim(edtemailpath.Text)+'\'+copy(datetostr(table3data.value),7,4)+copy(datetostr(table3data.value),4,2)+'\nfe\';
    ACBrNFe1.NotasFiscais.LoadFromFile(PathWithDelim(XCOMPLE)+trim(table3nfe.value));
      ACBrMail1.Host := edtSmtpHost.Text;
      ACBrMail1.Port := edtSmtpPort.Text;
      ACBrMail1.Username := edtSmtpUser.Text;
      ACBrMail1.Password := edtSmtpPass.Text;
      ACBrMail1.From := edtSmtpUser.Text;
      ACBrMail1.SetSSL := cbEmailSSL.Checked; // SSL - Conexão Segura
      ACBrMail1.SetTLS := cbEmailSSL.Checked; // Auto TLS
      ACBrMail1.ReadingConfirmation := False; //Pede confirmação de leitura do email
      ACBrMail1.UseThread := False;           //Aguarda Envio do Email(não usa thread)
      ACBrMail1.FromName := edtemitrazao.text;

      ACBrNFe1.NotasFiscais.Items[0].EnviarEmail( Para, edtEmailAssunto.Text,
                                               mmEmailMsg.Lines
                                               , True  // Enviar PDF junto
                                               , CC    // Lista com emails que serão enviado cópias - TStrings
                                               , nil); // Lista de anexos - TStrings


     finally
    CC.Free;
    end;
     MemoResp.Lines.add('     '+floattostr(table3fatura.value)+'  --->  '+trim(table3CLIENTE.value));
     MemoResp.Lines.add('                  Email  Enviado...');
  ACBrNFe1.NotasFiscais.Clear;

   acbrmail1.Clear;       <---------   coloquei esta opção apos cada email , enviando 3 emails ,diminuiu para 1 minuto por email

   também tente usar a porta 465
  end;

  • 2 semanas depois ...
Postado
Em 03/02/2016 at 09:29, Juliomar Marchetti disse:

Acho que vocês devem de atualizar o svn recompilar os pacotes e re-testar!

o Daniel senão me engano fez algumas mudanças e melhorias sobre essa situação!

 

Estou utilizando o componente ACBrMail e o mesmo está travando (congelado) o aplicativo. Já existe alguma atualização para este problema?

Erro ao travar o aplicativo:

rnge3:8389): Gtk-CRITICAL **: IA__gtk_widget_realize: assertion 'GTK_WIDGET_ANCHORED (widget) || GTK_IS_INVISIBLE (widget)' failed
 

Postado
21 horas atrás, Daniel Simoes disse:

O componente ACBrMail não faz uso de nenhum componente visual (WidGetSet)...

Provavelmente a mensagem vem da aplicação que está chamando o ACBrMail

Não pois estou testando o próprio exemplo disponibilizado pelo o ACBrMail e o mesmo trava a aplicação.

Postado
6 minutos atrás, Daniel Simoes disse:

Vá com o Debug e apure o ponto de "travamento"

provavelmente está ocorrendo uma demora no Login...

Entendo, mas criei uma nova aplicação a add um botão sem nenhum instrução e o componente sem nenhum configuração e acontece a mesma coisa, o aplicativo trava. Também fiz uma teste utilizando o componente em tempo de execução sem nenhuma configuração setada e também nenhuma chamada realizada e continua e mesma coisa. Trava a aplicação. 

  • Fundadores
Postado

Mergulhe no código (ligue o seu debug)... só com botão e tentativa e erro, você não vai descobrir nunca...

o problema é local (na sua máquina)... Centenas de desenvolvedores usam o ACBrMail com sucesso...

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.

  • Este tópico foi criado há 3200 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.