EMULADOR SAT
Olá galera boa Noite. Estou começando com o sat e como não tenho condições de adquirir um para desenvolvimento baixei o emulador off line do sefaz e funcionou blz. Descompilei o aplicativo comercial para ver como referencia a sat.dll do sefaz. Estou tentando comunicar com ele por uma aplicação vb6, desculpe mas para mim so serve vb6 porque não sei programar em vb.net. Pretendo aprender um dia. Para referenciar a sat.dll em vb6 fiz assim com um exemplo que peguei aqui no vbmania:
Public Declare Function Consultarsat Lib [Ô]C:\SAT\sat.dll[Ô] (ByVal NumeroSessao As Long) As String
e para consultar fiz assim:
Dim strInfosat As String
Dim intSessao As Integer
Randomize
strInfosat = Space(100)
intSessao = Int(Rnd(99) * 100)
strInfosat = ConsultarSAT(intSessao )
lblinfo.caption = strInfosat
ele consulta o emulador belezinha mas da erro
run-time error 49
Bad dll calling convention
tentei na net e não consegui resolver disse que calling convention da dll e cdecl e o vb6 so suporta stdcall
Da para resolver isso com vb6 ou so com vb.net
Desde já Agradeço.
Public Declare Function Consultarsat Lib [Ô]C:\SAT\sat.dll[Ô] (ByVal NumeroSessao As Long) As String
e para consultar fiz assim:
Dim strInfosat As String
Dim intSessao As Integer
Randomize
strInfosat = Space(100)
intSessao = Int(Rnd(99) * 100)
strInfosat = ConsultarSAT(intSessao )
lblinfo.caption = strInfosat
ele consulta o emulador belezinha mas da erro
run-time error 49
Bad dll calling convention
tentei na net e não consegui resolver disse que calling convention da dll e cdecl e o vb6 so suporta stdcall
Da para resolver isso com vb6 ou so com vb.net
Desde já Agradeço.
Procure no topico sobre SAT que tem uma dica referente a esta conversão no VB6.
Registrar as DLL ou OCX
Fala galera será que alguém pode me ajudar a resolver esse run-time error 49
Bad dll calling convention.
Desde já agradeço.
Bad dll calling convention.
Desde já agradeço.
Tópico encerrado , respostas não são mais permitidas