Jump to content

joab

Membros
  • Content Count

    6
  • Joined

  • Last visited

Community Reputation

0 Neutral

About joab

  • Rank
    Novato

Profile Information

  • Sexo
    Masculino
  • Localização
    campina grande - pb

Recent Profile Visitors

3,536 profile views
  1. descobri a causa do problema no oncreate do formulario eu carrego algumas dlls dinamicamente estrutura da minha app plugins dll1.dll dll2.dll dllN.dll app.exe conf.ini plugins é uma pasta que contem algumas dlls que eu carrego dinamicamente e a partir disso monto um menu com as opcoes disponiveis na dll(plugin) quando eu copiei pra nova pasta, essa pasta plugins estava vazia e o envio de email funcionou corretamente quando coloquei as dlls de volta o email nao foi mais enviado codigo de carregamento das dlls //... files := TDirectory.GetFiles(ExtractFilePath(ParamStr(0)) + 'plugins', '*.dll', TSearchOption.soTopDirectoryOnly); for fileFullName in files do begin try //tenta carregar a dll handle := LoadLibrary(PChar(fileFullName)); //nao conseguiu carregar a dll(plugin) if not (handle > 32)then //passa pra proxima dll(plugin) Continue; //caso exista alguma dll é adicionado um menu chamado plugins AddPluginsMenu; jMenuItem := nil; //em todas as dlls tem uma funcao chamada GetMenu, onde retorna um json com a arvore de menu do plugin jValue := TJSONObject.ParseJSONValue(ExecPluginFunc(ExtractFileName(fileFullName), 'GetMenu', false, false, false)); if not Assigned(jValue) then Continue; if not (jValue is TJSONObject) then Continue; jMenuItem := (jValue as TJSONObject); if not Assigned(jMenuItem) then Continue; //adiciona o menu do plugin(dll) ao menu da app FromJSONToMenu(jMenuItem, menuplugins); finally FreeLibrary(handle) end end; //... algum trecho desse codigo prejudica o componente ACBRMail
  2. Copiei o aplicativo para outra pasta e consigo enviar Na pasta original nao consigo configuracao atual ssl na syswow64 e system32 windows defender desativado ou ativado, nao tenho antivirus instalado firewall desativado ou ativado o conteudo das pastas estao identicos e o usuario tem controle total sobre as pastas nessas condicoes na pasta nova funciona e na pasta original nao funciona
  3. Opa Daniel, testei com as versoes 0.9.8.1 e 0.9.8.14 (libeay32.dll e ssleay32.dll) que vem com o acbr tanto na pasta do app quanto na pasta syswow64 e na system32, mesmo problema
  4. Bom dia pessoal, sei que o tópico é antigo mas pra não abrir outro vou por minha dúvida aqui mesmo já que está no mesmo contexto . Hoje consigo enviar email usando o exemplo do Acbr, o MailTest.exe, pelos provedores gmail, yahoo e hotmail sem problemas No gmail consigo enviar habilitando a opção para liberar aplicativos menos seguros ou habilitando o logon em duas etapas. No yahoo habilitando a opção para liberar aplicativos menos seguros. No hotmail nao precisei configurar. No entanto, na minha aplicacao, usando o mesmo codigo gera o erro 'Smtp error: unable to login'. Pra testar adicionei o mesmo form do exemplo MailText.exe no meu projeto, mas dentro do meu projeto gera o mesmo erro. Obs.: ate dois dias atras a aplicacao estava funcionando corretamente, Antivirus desabilitado, firewall desabilitado, ACBRMail.pas revision 13922 na imagem abaixo o app demo do acbr TestMail.exe funcionando corretamente na imagem abaixo minha app com o form do demo do acbr adicionado e gerando o erro
  5. mrcsroberto, para ambiente de homologação, usando o trunk1, ate antes da ultima atualização dos webservices, estava funcionando. apos a atualização que exige a tag '<infNFeSupl><qrCode>' no xml não esta mais funcionando, mas outras questões estão envolvidas. o primeiro erro que obtive foi um retorno da sefaz criticando a falta da tag '<infNFeSupl><qrCode>' fiz algumas alterações nos fontes e consegui colocar a tag no xml com a informação do qrcode e o erro mudou, agora informando que a url não era válida. depois consegui descobrir que colocando a url seguindo a regra que informei no primeiro post não funciona. embora a url esteja correta para impressão do danfe, a sefaz não consegue validar, então coloquei a url antiga e deu certo. deve ser algum erro da sefaz na hora de validar. no trecho de codigo no primeiro post que fiz if Pos('?', urlUF) > 0 then Result := urlUF + '&' + sEntrada + cIdToken+ '&cHashQRCode=' + cHashQRCode else Result := urlUF + '?' + sEntrada + cIdToken+ '&cHashQRCode=' + cHashQRCode; basta deixar assim: Result := urlUF + '?' + sEntrada + cIdToken+ '&cHashQRCode=' + cHashQRCode; o qrcode do danfe sai errado mas o xml é enviado com sucesso. você pode bolar uma lógica para o danfe e outra para colocar na tag ate que eles corrijam a validação. lembrando que você vai precisar alterar os fontes para incluir a tag '<infNFeSupl><qrCode>'. ate a minha ultima atualização há umas 3 semanas, não lembro bem, o trunk1 não tinha isso e acredito que não terá uma vez que o administrador do acbr ja avisou que não atualizará mais o trunk1. o trunk2 nao testei ainda, nao estou podendo fazer a migracao agora.
  6. existe uma falha ao gerar a url do qrcode para o estado da paraiba na funcao NotaUtil.GetURLQRCode da unit ACBrNFeUtil a url base do estado é 'https://www5.receita.pb.gov.br/atf/seg/SEGf_AcessarFuncao.jsp?cdFuncao=FIS_1410' ao final da funcao são acrescentados os parametros a essa url em 'Result := urlUF + '?' + sEntrada + cIdToken+ '&cHashQRCode=' + cHashQRCode;' como na url base já existe uma '?' e outra é adicionada, a url resultante fica inválida. temporariamente resolvi assim: if Pos('?', urlUF) > 0 then Result := urlUF + '&' + sEntrada + cIdToken+ '&cHashQRCode=' + cHashQRCode else Result := urlUF + '?' + sEntrada + cIdToken+ '&cHashQRCode=' + cHashQRCode; o erro ocorre apenas para esse estado já que é o único que tem a url base já com um parametro ('?cdFuncao=FIS_1410').
×
×
  • Create New...