Jump to content

dia-do-acbr-online.png

Ganhe acesso a todas Palestras
Assinando o Suporte ACBr Comercial

Saiba Mais


dia-do-acbr-online.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

sucsis

Usuários SAC
  • Content Count

    16
  • Joined

  • Last visited

Community Reputation

0 Neutral

About sucsis

  • Rank
    Novato

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Bom dia, Integramos aqui na empresa há quase 01 mês o ACBrMail para disparo de e-mails de XML/DANFe e boletos, tudo correu bem e o processo funciona normalmente, porém estou tendo problemas para enviar e-mails cujo o destinatário tenha servidor próprio. Exemplo, caso o provedor do destinatário seja Gmail, Yahoo, Outlook etc... o email chega normalmente, porém se o cliente tem um servidor próprio, exemplo [email protected] o sistema envia o e-mail mas em seguida recebo o retorno abaixo: Reporting-MTA: dns; smtp-sp203-40.hospedagem.net X-Postfix-Queue-ID: E343A20050E2
  2. Pessoal, Recentemente passamos a utilizar o componente ACBrLibMail e por ter sido muito útil passamos a estudar a migração também do nosso atual sistema de geração de boletos/remessa/retorno para o ACBrLibBoleto e futuramente pretendemos gerar nossos documentos fiscais com os componentes ACBr. A solução que utilizamos hoje para NFC-e é o Fiscal Manager da Bematech/Totvs que é um aplicativo que fica rodando no SysTray aguardando comandos. A troca de informações acontece via JSON através de uma API, o Fiscal Manager faz toda a gestão para nós, apenas enviamos os dados/valores, ele por
  3. No Outlook, após algum tempo ao logar ele me solicitou confirmar o número de celular, a partir daí o envio começou a funcionar. No Yahoo não aconteceu isso, mas passou a funcionar sozinho também.
  4. Bom dia, Consegui implementar com sucesso a integração do sistema com o ACBrMail, consegui enviar os emails através do SMTP Gmail e também do SMTP oficial da própria empresa, porém esta solução também vai pro cliente e normalmente eles costumam usar Gmail, Hotmail/Outlook, Yahoo, mas não obtive sucesso no envio com relação aos dois últimos, sendo que tentei de diversas formas Observação 01: Usar outro tipo de serviço como o SparkPost e similares não é uma possibilidade. Observação 02: Verifiquei que Yahoo e Outlook trabalham com um tal de "STARTTLS", mas não sei se tem haver com
  5. Consegui resolver. O problema em questão tem haver com as declarações mas não com os tipos propriamente ditos. Tanto na declaração quanto na chamada da função, é necessário informar que o argumento deve ser enviado como referência, simplesmente adicionando um "@" antes do nome do parâmetro, da seguinte forma: DLL32 Function MAIL_UltimoRetorno(@vMsgRet AS STRING, @vTamBuf AS _INT) AS _INT PASCAL FROM "MAIL_UltimoRetorno" LIB xDllMail Observação: Acredito que a classe disponibilizada nos fontes funcione somente para Harbour e não para xHarbour Comercial, se possível alguém po
  6. Rafael, eu tentei usar a classe, mas simplesmente não funciona. Tentei inclusive extrair o carregamento e a chamada das funções da própria classe e também não funciona. Vou alterar as declarações, mas a princípio a própria documentação da ACBrLib informa que tanto o retorno quanto o segundo parâmetro é um "Integer". Com relação a tipagem dos parâmetros, os tipos não são do Harbour prorpiamente dito, mas sim do C. Vou usar o tipo "LPSTR" que é equivalente a um ponteiro para string em C para ver se funciona.
  7. Bom dia, Estou utilizando a DLL ACBrMail32.dll para envio de e-mails, tudo funciona conforme esperado com exceção das funções que retornam strings, tais como MAIL_Nome(), MAIL_Versao() e MAIL_UltimoRetorno(). Elas retornam -10 indicando que houve falha na execução do método, além disso os parâmetros passados por referência não retornam com nenhuma informação. Estou utilizando a linguagem xHarbour (comercial), as funções da DLL foram declaradas da seguinte forma: xDllMail:=LoadLib32("ACBrMail32.dll") DLL32 Function MAIL_UltimoRetorno(vMsgRet AS STRING, vTamBuf AS _INT) AS _IN
  8. Bom dia Rafael, Obrigado pelo empenho em tentar ajudar, a constante referida está sim no arquivo ACBrLib.ch, eu baixei junto com a classe ACBrMail e linkei na aplicação, infelizmente não foi possível utilizá-la. Conforme expus na resposta anterior, consegui fazer a DLL funcionar compartilhando a mesma instância da DLL entre as chamadas das funções, carregando a DLL no inicio do .PRG com LoadLib32() e declarando as funções no final do PRG referindo a instância retornada por LoadLib32(). Com relação ao DllPrepareCall(), ela fazia o processo todo funcionar pois ela instanciava a DL
  9. Atualização Depois de passar a tarde inteira tentando, descobri que o funcionamento da DLL é por instância, fazendo com que a forma tradicional de declaração não funcionasse como o esperado. Exemplo: DLL32 Function MAIL_Finalizar() AS _INT PASCAL FROM "MAIL_Finalizar" LIB "ACBrMail32.DLL" O código acima funcionará no sentido de expor esta função da DLL para sua aplicação, porém para cada função que você chamar, estará fazendo de um objeto diferente, assim as funções não funcionará adequadamente. A Solução? Simples, no início do PRG criei uma variável global chamada
  10. Consegui fazer as funções darem o retorno correto adicionando a seguinte linha antes de chamar as função da DLL DllPrepareCall("ACBrMail32.dll", 0x0010, "MAIL_Inicializar") Nãos sei por que, mas só funciona assim. Porém estou com outro problema, o método MAIL_Send() sempre retorna -10. Obs: não é configuração de email pois com a forma de envio anterior do sistema está enviando normalmente...
  11. Depurando aqui, verifiquei que hResult := CalDll sempre retorna vazio
  12. Boa tarde, Fiz o teste usando a classe. Não é possível nem instanciar, pois da erro de execução Comentei algumas linhas para conseguir instanciar, mas ao tentar chamar mail:Nome() e mail:Versao() simplesmente não retorna nada... Engraçado é que fiz um teste na linguagem C# e consegui chamar as funções normalmente, as mesmas retornaram 0 conforme esperado Mas não estou conseguindo fazê-las funcionar no xHarbour de maneira alguma... Quanto a declaração das DLLs, usamos várias outras DLL's aqui (FlexDocs, MySql Elgin) e sempre declaramos assim...
  13. Baixei a DLL no dia 02/10, no fórum, área de downloads consta que a atualização é do dia 14/09
  14. O PRG está da seguinte forma /* * Funções do ACBrMail */ DLL32 Function MAIL_Inicializar (vArqCfg AS STRING,; vChvCri AS STRING) AS _INT PASCAL FROM "MAIL_Inicializar" LIB "ACBrMail32.DLL" DLL32 Function MAIL_Finalizar ( ) AS _INT PASCAL FROM "MAIL_Finalizar" LIB "ACBrMail32.DLL" DLL32 Function MAIL_Clear ( ) AS LONG PASCAL FROM "MAIL_Clear" LIB "ACBrMail32.DLL" DLL32 Function MAIL_SetSubject (vSubJct AS STRING) AS _INT PASCAL FROM "MAIL_SetSubject" LIB "ACBrMail32.DLL" DLL32 Function MAIL_AddAddress
  15. Bom dia, estou utilizando a linguagem xHarbour (temos costume aqui de utilizar várias outras DLLs). Estou num SO de 64 bits, porém o sistema é de 32 bits, peguei a DLL dessa arquitetura, convneção de chamada StdCall. Exemplo de como foi declarado a função da DLL: DLL32 Function MAIL_Inicializar(vArqCfg AS STRING, vChvCri AS STRING) AS _INT PASCAL FROM "MAIL_Inicializar" LIB "ACBrMail32.DLL" Vou fazer o teste no DEMO...
×
×
  • Create New...