[Resolvido]Vinculação das Tabelas do BackEnd via VBA

Boa Tarde a todos,

Pessoal seguinte tenho um projeto já rodando a algum tempo aqui na empresa. O que acontece, houve uma atualização do office 2010 32bits para o 2016 64bits das maquinas, atualizei o codígo com o a estensão PtrSafe até aqui blz o erro foi corrigido, porém precisei mudar o BD (BackEnd) de lugar no servidor e o modulo que realizava a verificação e revinculação das tabelas, no botão procurar parou de funfar, não responde nem da erro nem nada.

Esta parte do meu projeto peguei em um exemplo antigo que encontrei na net e adaptei ao meu.

Olhei o codígo varias vezes e não consegui encontrar o problema.

Se alguem puder dar um help ficarei muito grato.

Anexei o arquivo para análise.

Isso está ocorrendo porque está faltando uma referência, como pode ver na imagem abaixo:



Procure essa referência,mas com o número que existe no computador que vai rodar o programa.

[ ]'s

Noobezinho,

Obrigado pelo retorno.

No meu não mostra erro. A referência está marcada e não mostra ausente.
Este erro que apontou ocorreu sim, porém quando atualizei pela primeira vez o Office para o 2016 64bis em minha máquina e tentei rodar o sistema nas maquinas que ainda estavam com 2010 32bits, mas quanto todas foram atualizadas o erro foi corrigido. Ficou apenas o erro na extensão de declaração de função PtrSafe que também corrigi.

O sistema roda normal, só que ao muda-lo de lugar abre a janela para atualizar o caminho do BD e ao clicar em procurar para encontrar o BD nada acontece, sem erro, ele não abre a janela de procura. Me parece alguma coisa no modulo mod_ProcuraArquivo relacionado ao metodo OpenFile Já desmarquei as tratativas de erro “On Error Resume Next” que encontrei para ver se aponta o erro, mas nada também.

Borges

Na realidade esse algoritmo que está usando tem um problema.

Experimente assim e verá que ele irá funcionar, ao menos aqui funcionou.

Apague o caminho do BE da tabela, deixe em branco.

dai rode a macro autoexec e veja.

Eu fiz meu próprio método de vinculação, se tiver interesse:

maximoaccess.com/t28798p1-resolvidomodulo-checavinculo-do-exemplo-maestro#201030

[ ]'s

Noobezinho,

Muito obrigado!! Adaptei seu método aqui funfou legal, valeu mesmo ótimo! Parabéns pelo trabalho.

Vou tentar entender qual foi problema no algorítmo do outro projeto. Sempre é bom termos duas opções disponíveis.

Outro ponto que vou ver, acredito não ser viavel deixar a caixa de dialogo para o usuário. O BD pode ser excluido por ela.

Valeu abraço.

"O BD pode ser excluído por ela."

Backups, meu amigo, backups.

E num periférico por favor, senão, não é  cópia de segurança!

Valeu pelo retorno!

Boa sorte!