Ir para conteúdo
  • Cadastre-se

RFE Sistemas

Membros
  • Total de ítens

    21
  • Registro em

  • Última visita

Posts postados por RFE Sistemas

  1. 19 horas atrás, Juliomar Marchetti disse:

    Boa tarde.

    está falando de tu pegar o xml que tu tens e abrir no Lib e ter o objeto da nfe preenchido pra tu inserir no banco?

    ou está falando da distribuicaoDFe que você baixa o xml usando o certificado digital?

    Se tiver os dois seria melhor... é que pesquisei e não encontrei nada em VB.

  2. Boa tarde, fiz o cancelamento do SAT perfeito foi certinho, no entando quando vou imprimir não imprime e fecha o sistema. Alguém poderia me ajudar? Segue abaixo os Códigos usados. 

     

    /* --------------------------- Botão de impressão ------------------*/

    Dim XmlVenda, XmlCancelamento As String

    XmlVenda = "C:\Program Files (x86)\Microsoft Visual Studio\VB98\Vendas\11111111111111\202007\24\AD35200711111111111111591234567890002074158897.xml"
    XmlCancelamento = "C:\Program Files (x86)\Microsoft Visual Studio\VB98\Cancelamentos\11111111111111\202007\24\ADC35200711111111111111591234567890002082256479.xml"
        retorno = sat.CancelarCFe(XmlVenda)
        'SetResposta retorno


    sat.ImprimirExtratoCancelamento XmlVenda, XmlCancelamento, vbNullString

     

    /* --------------------------- Função Criada ------------------*/

    Public Function ImprimirExtratoCancelamento(ByVal eArquivoXml As String, ByVal eArquivoXmlCancelamento, Optional ByVal eNomeImpressora As String = "")

        Dim retorno   As Long
        
        'retorno = SAT_ImprimirExtratoVenda(eArquivoXml, eNomeImpressora)
        'CheckResult (retorno)
        
       retorno = SAT_ImprimirExtratoCancelamento(eArquivoXml, eArquivoXmlCancelamento, eNomeImpressora)
       CheckResult (retorno)

    End Function

     

    /* --------------------------- Declaração ------------------*/

    Private Declare Function SAT_ImprimirExtratoCancelamento _
                    Lib "ACBrSAT32.dll" (ByVal eArquivoXml As String, _
                                         ByVal eArquivoXmlCanelamento, _
                                          ByVal eNomeImpressora As String) As Long

  3. Boa Tarde, graças a ajuda consegui gerar o xml perfeitamente enviei para o emulador fez todo processo corretamente, no entanto gostaria de saber como faço para visualizar o SAT na tela para fins de teste de layout claro e também gostaria de saber onde pego os retornos para gravar no banco, pois quando vou receber o retorno o projeto fecha automáticamente. Alguém poderia me auxiliar o que pode estar acontecendo? e também me dar um help na questão da impressão do SAT? Desde de já agradeço a todos.Capturar.PNG.bae71a19a549df8b920e429ee95e6dc2.PNG

  4. Fazendo testes aqui como me enviou um .exe fiz o seguinte peguei as dlls e compilei o projeto com o projeto compilado rodou tranquilo certinho comunicou com o emulador da sefaz... mas quando eu rodo pelo vb ele da o mesmo erro e com o projeto compilado quando consulto o status fecha o exe então precisaria debugar pra ver o que acontece... alguma sugestão de que possa ser esse erro rodando pelo vb?

  5. exclui todos e baixei novamente como orientado acima, vou passar os links de onde baixei caso tenha baixado algo errado e vou mostrar os prints das dll caso esteja errado e por favor se possivel me ajudem a encontrar os links corretos pois sou novo e ainda estou meio perdido em encontrar as coisas.

     

    Capturar.PNG

    Capturar.PNG

  6. 18 horas atrás, Rafael Dias disse:

    Sim eu uso aqui fiz os teste eu mesmo, e funciona normal.
    Tente a seguinte estratégia para facilitar, cria um pasta chamada ACBrLib e dentro dela uma chamada x86 e copie a dll e suas dependências para esta pasta.

    O VB6 tem problema de ler a dll no path do projeto, lembrando que o vb6 so funciona com dll StdCall e x86 apenas.

    fiz o que disse mas ainda dá este erro nem inicializa.

     

    Capturar.PNG

    e essas linha comentadas estão incorretas ai certo ? pode me orientar?

    Capturar.PNG

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