MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Pegar informações de Tabelas DBF

    Compartilhe

    DaviSilva
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 26
    Registrado : 26/09/2013

    [Resolvido]Pegar informações de Tabelas DBF

    Mensagem  DaviSilva em Sex 02 Jun 2017, 13:38

    Bom dia, já estou a algum tempo tentando pegar informações de tabelas DBF onde trabalho.
    Até já consigo fazer isso importando-as, mas isso é um processo um tanto quanto demorado e não garante que as tabelas que o FrontEnd dos usuários tem, sempre irão estar atualizadas.

    Já pesquisei em vários foruns, inclusive neste, Google, mas não encontrei nada que fosse efetivo para meu problema.

    Já tentei fazer conexão usando a o comando Conection, mas sempre da erro quando compilo na parte
    Set cn = New Connection e retora o erro [Uso inválido da palavra new].


    O que realmente preciso:

    Pegar informações das tabelas DBF em tempo Real e talvez se for possível fazer isso via access, alterar e inserir valores. Mas me contento em eliminar a pratica de importar as tabelas.

    avatar
    Uilson Brasil
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1021
    Registrado : 23/04/2013

    Re: [Resolvido]Pegar informações de Tabelas DBF

    Mensagem  Uilson Brasil em Sex 02 Jun 2017, 14:49

    Tente fazer essa conexão através do ODBC ...
    Anexos
    IMG.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (47 Kb) Baixado 5 vez(es)


    .................................................................................
    ::: Uilson Brasil
    ::: Design in Microsoft Access

    DaviSilva
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 26
    Registrado : 26/09/2013

    Re: [Resolvido]Pegar informações de Tabelas DBF

    Mensagem  DaviSilva em Seg 05 Jun 2017, 19:20

    Uilson Brasil muito obrigado pela tentativa, mas como estou usando access 2000, acredito não ter essa opção. Em todo caso, acabei conseguindo.

    Na verdade a resposta esta na minha cara, mas por falta de alguma informação, não estava dando certo.

    Criei um variável de objeto e conectei usando o comando OpenDatabase.

    Exemplo:
    Dim objBanco As Object
    Set objBanco= OpenDatabase("strCaminhoBanco", False, False, "dBASE III;")

    Após estar conectado, ao invés de usar o comando CurrentDb para referenciar os objetos das tabelas uso o objeto do banco.

    Exemplo:

    Dim sqlClientes As String
    Dim objClientes As Object

    sqlClientes  = "SELECT * FROM cliente"
    Set objClientes = objBanco.OpenRecordset(sqlClientes)

    Problema resolvido.
    avatar
    Uilson Brasil
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1021
    Registrado : 23/04/2013

    Re: [Resolvido]Pegar informações de Tabelas DBF

    Mensagem  Uilson Brasil em Seg 05 Jun 2017, 23:11

    ótimo


    .................................................................................
    ::: Uilson Brasil
    ::: Design in Microsoft Access

      Data/hora atual: Sab 23 Set 2017, 06:47