Trasnferência de dados entre tabelas

[Adilson Calixto 0]

Bom dia a Todos,

 

Estou com um problema: Tenho um tabela (tblFechamento) que poucos campos identicos a tblCadastroAlunos (exigência do cliente, para facilitar o trabalho da secretária, falei para ele a respeito da redundância, mas quis assim). Bem tenho dois campos na tblFechamento (Nome e Internação), preciso fazer uma verificação: caso o campo internação esteja marcado (Tipo Sim/Não), ou seja com o valor Sim a rotina dee copiar todos os nomes da tblFechamento que este campo esteja marcado e fazer uma verificação na tabela cadastro de alunos se não há coincidentes, caso não haja conincidentes, exibir numa listbox os nomes ao abrir o cadastro de alunos e perguntar se deseja cadastrar para quando numa listbox clicar em cima do nome ir cadastrando e eliminando do listbox.

 

Alguém pode me ajudar?

 

Agradecido

 

Adilson

[Mário Monteiro 179]

Não entendi exatamente o que deseja

 

Você tem duas tabelas com os mesmos dados e que copiar coisas de uma para a outra?

 

Explique mais passo a passo o que precisa

[Adilson Calixto 0]

O que desejo é que ao abrir o cadastro de alunos seja feita uma verificação na tblfechamento (nome e internação) os campos verificados e compara-los com o campo nome da tblcadastroalunos se não for igual mostrar um listbox com os nomes ainda não cadastrados e ao clicar nele colocar no campos no da tblcadastroalunos e salvar.

 

Deu para entender?

 

Adilson

[Mário Monteiro 179]

A tabela que poderá ser maior que a outra é a tblfechamento?

 

Se entendi precisa fazer um consulta numa que verifique os registros que não tme na outra

 

Para lhe ajudar mais poste os campos existentes nas duas tabelas e seu tipos

[Adilson Calixto 0]

Na tabela fechamento é só o campo nome e na tabela cadastro de aluno também. ambos com o tipo de dados texto

[Mário Monteiro 179]

Então seria algo assim

 

SELECT * FROM tblFechamento WHERE Nome NOT IN (SELECT Nome FROM tblCadastroAlunos)

 

Isso mostrará o que tem numa que não tem na outra

[Adilson Calixto 0]

Consegui assim:

 

Queimei uma boa parte da grande quantidade de cabelo na cabeçça que tenho (kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk) mas consegui. fiz o seguinte:

riei um form e coloquei um list box com uma consulta assim:

 

SELECT TabFechamento.Internamento, TabFechamento.Nome

FROM TabFechamento LEFT JOIN TabAluno ON TabFechamento.[Nome] = TabAluno.[Nome]

WHERE (((TabFechamento.Internamento)=Yes) AND ((TabAluno.Nome) Is Null));

 

Funcionou, só preciso de mais uma ajuda dos Mestres, gostaria de quando clicar num nome do list ele aparece já na caixa de texto do form que está por baixo como faço isso?

 

pode me ajudar

[Mário Monteiro 179]

é só atribuir o valro de uma caixa na outra no codigo de seu formulario no evento _Change() e seria bom também no _LostFocus() do CAMPO1

 

NOMEDOCAMPO2 = VALORCAMPO1