ACBrLibSat VB6

[Elcio Pereira]

Amigos... me perdoem a insistência.

Coloquei  todo o projeto em uma só pasta “ACBrSATLib” localizada no desktop inclusive a ACBrSAT32.dll  (versão StdCall   32bits) .  O Erro: "Run time error 53. File not found  ACBrSAT32.dll"  persiste.

Tentei colocar a dll nas seguintes pastas:

• ·          Path Local do programa EXE.
• ·         C:\WINDOWS
• ·         C:\WINDOW\SYSTEM32
• ·         C:\Program Files\Microsoft Visual Studio\VB98

Chegue até a alterar o local do arquivo na declaração da função:

Public Declare Function SAT_Inicializar Lib "C:\WINDOW\SYSTEM32\ACBrSAT32.dll" (ByVal eArqConfig As String,  ByVal eChaveCrypt As String) As Long

Nada disto fez com que a dll fosse localizada/reconhecida.

 

 

Outro problema, mais fácil é que temos duas chamadas que estão com a quantidade de parâmetros não coincidentes.

 retorno = SAT_ImprimirExtratoVenda(CommonDialog1.FileName, vbNullString, buffer, bufferLen)

retorno = SAT_ImprimirExtratoResumido(CommonDialog1.FileName, vbNullString, buffer, bufferLen)

 

Public Declare Function SAT_ImprimirExtratoVenda   Lib "ACBrSAT32.dll" (ByVal eArquivoXml As String,  ByVal eNomeImpressora As String) As Long

Public Declare Function SAT_ImprimirExtratoResumido   Lib "ACBrSAT32.dll" (ByVal eArquivoXml As String,  ByVal eNomeImpressora As String) As Long

[Rafael Dias]

A dll so ACBrSatLib precisa das dlls do Openssl e do LibXml2 você vai encontrar as mesmas em  "DLLs\LibXml2\x86" e ""DLLs\OpenSSL\1.0.2.13\x86".

Já adicionei esta informação na descrição dos Downloads.

Sobre o demo foi enviado a correção para o repositório, também foi enviado o demo e a classe de alto nível para download aqui

 

[Amarildo de Matos]

boa tarde..

opa..valeu a dica ai rafael.. nem domingo escapa.hihi