Importar dados de tabela e subtabela via vba

Prezados, boa noite !

Há alguma maneira de realizar a seguinte importação de dados para uma base de dados: tabela e subtabela ?

Acontece que o BKP do sistema se corrompeu ( PenDrive ) mas consegui recuperar uma base antiga ( Back end e Front ).   No BE estão quase 1.600 registros de uma determinada tabela.

O que ocorre, no sistema atual ( tanto o antigo como o novo tem as mesmas tabelas, formulários, consultas e relatórios ou seja....idênticos !!) tenho apenas 100 registros em uma determinada tabela.

O que preciso, pegar esses 1.600 registros que recuperei dessa tabela ( TblPedido ), lembrando que essa tabela tem uma subtabela( TblSubPedido ) agregada e com registros, dados... ( 1-n ) e importar para o sistema novo ( a tabela de origem e destino tem o mesmo nome e a subtabela também. )

Tem como realizar isso via VBA ?

Agradeço a ajuda !!

Abraços.

Já que têm o mesmo nome, não dá para renomear as tabelas no novo e importar as tabelas do velho via importar objectos ?

Boa Tarde JPaulo, grato desde já pela atenção.

Eu esbarro na chave primária da tabela principal que se relaciona com a chave estrangeira da subtabela. Fiz o que me sugeriu acima, mas ficou 122 registros fora da importação.

Esses 122 registros são os que estão nas tabelas do novo, certo ?

Bom dia senhores, entrando no debate!

Meu amigo, quando tenho que importar registros onde envolvem registros relacionados, que tenho que gravar o registro Principal, recuperar o ID dele e em seguida lançar os registros filhos em outra tabela vinculando com esse ID eu geralmente faço assim:


Faço através de recordset.
Apos gravar o registro na tabela tbVendas (por exemplo), eu faço um Dlookup() pra buscar o ID do registro gravado. Se tiver alguma coisa única, eu utiliza ela como critério para recuperar o ID, se não tiver eu utilizo o DMAX() <== Porem o Banco não deve está em USO por ninguém duranta a importação.

Com o ID recuperado em uma variável, eu inicio o inserção dos dados nas outras tabelas secundarias e utilizo o ID recuperado a cima.

Nunca tive problema dessa forma.

Boa tarde, retornado ao tópico....

Vejam a imagem abaixo,





Esse é o meu dilema que estou a viver no presente momento.

A minha dica se Aplica perfeitamente pro seu caso...

Você terá que IGNORAR a chave Primária da Base antiga, pois na importação ele receberá nova Chave.

Use como critério para recuperar o Novo ID do registro gravado, os campos "Nosso Pedido" e "Data Pedido"

Fábio, boa tarde...

Há como ceder um exemplo, pois é a primeira vez que pego " uma encrenca " dessas.

Agradeço.

Veja aqui nesse Topico amigo! Faço isso varias vezes no código.

Faço com o Fornecedor e com a Nota Fiscal para lançar os produtos...

https://www.maximoaccess.com/t29286-importar-todas-as-nfe-nota-fiscal-eletronica-xml-de-uma-pasta-versao-xml-1-10-2-00-e-3-10

Olá a todos,
Amigo Silvio, não seria mais fácil pegar na tabela antiga e adicionar os registos "novos" da base de dados "nova"

Se tem relacionamento e integridade de dados pode:

a) Lançar primeiro os dados do "pai" (TblPedido) e depois do "filho" (TblSubPedido)
ou
b) remover o relacionamento temporariamente até importar tudo direitinho.

Com consulta acréscimo resolve facilmente.

Fica a minha sugestão.

Abraço