MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Modulo de Biometria (GrFingerXCtrl1.CapInitialize)

    avatar
    DZABEU
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 12/10/2020

    Modulo de Biometria (GrFingerXCtrl1.CapInitialize) Empty Modulo de Biometria (GrFingerXCtrl1.CapInitialize)

    Mensagem  DZABEU em Sex 16 Out 2020, 2:07 pm

    Fala pessoal tudo bem?

    A muitos anos atras, uns 7..8 anos, eu adquiri de um colega nosso um modulo de leitura da Griaule, para impressão digital. Na epoca, meu sistema rodava em MSAccess 2007 e no Windows 7, rodava tudo normal.

    Estou retomando o projeto, e hoje quando fui iniciar o codigo, o sistema não esta funcionando.

    O erro acontece no trecho "erro = GrFingerXCtrl1.Initialize"
    ?error
    O objeto não aceita esta propriedade ou método

    Ele ja esta referenciado nas bibliotecas do VBA (a Dll). Eu tambem instalei o programa q precisa pra rodar "NITGEN_HamsterMouse_Setup_OEM_v43026_x64", tambem testei se o leitor esta funcionando atraves de um software chamado NFD 64.exe e ele funciona normal, mas na aplicacao do access não mais..

    Alguem passou por isso?

    Obrigado!

    Código:
    '---------------------------------------------------------------------------------------
    ' Procedure     : InicializaBio
    ' Author        : Harysohn P. Pina (PILOTO) - Harysohn@hotmail.com
    ' Fórum         : Fórum Máximo Access -  http://maximoaccess.maisforum.com/
    ' Date          : 25/1/2013
    ' Comentários   : Inicia o aplicativo de captura utilizando a dll GrFingerX
    '---------------------------------------------------------------------------------------
    Private Function InicializaBio()
              ' Cria um novo molde
          '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    10    On Error GoTo TrataErro
          Dim NomeProcedimento As String
    20        NomeProcedimento = "InicializaBio"
              'Adiciona o nome do procedimento à função
    30        PegaProcedimento (NomeProcedimento)
          '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    40        ReDim template.tpt(10000) As Byte
    50        raw.widht = 0
    60        raw.Height = 0
              ' Inicia a biblioteca
    70        erro = GrFingerXCtrl1.Initialize
    80        If erro < 0 Then
    90            EscreveLog ("Erro no aparelho de biometria")
    100           Exit Function
    110       End If
              ' Inicia Captura
    120       InicializaBio = GrFingerXCtrl1.CapInitialize
    130       Exit Function
    140   Exit Function
          '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
          'Tratamento de Erros
          '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    Exit_TrataErro:
    150       DoCmd.Hourglass False
    160       DoCmd.Echo True
    170   Exit Function
    TrataErro:
    180       Select Case err.Number
            Case 0
                'Não é um erro
    190     Case Else
    200         DoCmd.Hourglass False
    210         DoCmd.Echo True
                'Chama a função global de tratamento de erros
    220           GlobalErrHandler (Me.Name)
    230     End Select
    End Function
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7781
    Registrado : 05/11/2009

    Modulo de Biometria (GrFingerXCtrl1.CapInitialize) Empty Re: Modulo de Biometria (GrFingerXCtrl1.CapInitialize)

    Mensagem  Alexandre Neves em Sex 16 Out 2020, 8:05 pm

    Boa noite e bem-vindo ao fórum
    Por se tratar de situação específica, já tentou contactar o criador do sistema através de c.e.? (Harysohn@hotmail.com)


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    DZABEU
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 12/10/2020

    Modulo de Biometria (GrFingerXCtrl1.CapInitialize) Empty Re: Modulo de Biometria (GrFingerXCtrl1.CapInitialize)

    Mensagem  DZABEU em Ter 20 Out 2020, 6:49 pm

    oi boa noite!

    Eu mandei e-mail para ele sim, mas ainda não tive nenhuma resposta. Aproveitando o topico, alguem tem experiencia com integracao biometrica? Na epoca (e esta solucao) utilizava a sdk da Griaule, mas ja existem outras no mercado como a FingerTech.

    Obrigado!

      Data/hora atual: Ter 01 Dez 2020, 6:09 pm