[Resolvido]Problema com DLookup

Oi pessoal,
preciso muito da ajuda de vcs.
Tenho um BD com as seguintes tabelas :
tblProdutos (Tem um campo CódigoInterno que eu informo manualmente no form)
tblKitDeVedacao (Tem um campo CódKit que eu informo manualmente no form)
tblItensDoKitDeVedacao

o que eu preciso é o seguinte : No form formKitDeVedacao tem um subForm ItensDoKitDeVedacao (tudo puxando das tabelas correspondentes)e nesse Sub eu
insiro itens da minha tblProdutos, através do código do Produto escolhido na caixa de combinação. Aí vem o problema... preciso de uma função (ou qualquer outra coisa), que insira na minha tblProdutos (nessa tbl tem um campo com nome de NrKitVedacao), o CódKit que está no formKitDeVedacao, e o detalhe é o seguinte : muitas vezes um item da minha tblProdutos serve para vários Kit's, então necessito que a função busque todos os CódKits (e não só um) e coloque em sequencia no campo NrKitVedacao.

para ter uma idéia na minha tbl de Produtos está assim :

Este item pertence ao kit nr : xx,xx,xx,xx etc...(aqui está o campo NrKitVedacao)


Agradeço muitíssimo pela ajuda, é meu primeiro post

Bem vindo ao Fórum Amigão...

Eu não entendi muito bem o que pretende..

Na hora de inseri produtos no SubFrm enviar para o Campo um numero que esta no form?

Se puder envia a BD Ficaria mais facil para quem for ajudá-lo a resolver a questão

Saudações

Obrigado amigo pela dica... mas como disse é o meu 1º post,e não sei como fazer
para enviar o BD... poderia me explicar ??


obrigado de novo

Logo abaixo onde voce escreve a mensagem voce encontra um botão procurar...clique, busque o seu BD e clique em enviar..

Caso não consiga por ai, pode colocá-lo no DropBox, MegaUp Load ou outro site de Donwloads..
e colocar o Link na mensagem

Saudações

Vou tentar postar aqui meu BD...

As tabelas e os formulários em questão são :

tblProdutos
tblKitDeVedacao
tblItensDoKit

e form

frmCadastroProdutos
frmKitDeVedacao
SubformulárioDeKit


quem puder ajudar agradeço muito !!!

SCGR.mdb

Amigão, baixei seu BD, ele me pareceu confuso para mim, mas nao sei realmente o seu funcionamento no dia a dia.. mas bem

Pelo que entendi

voce quer cadastrar um produto..ex.:

Produto xxxx

e na hora de colocar o codigo kit, puxar na outra tabela e escolher a quais quits esse produto pertence, assim:


Produto xxxx

Pertence ao Kit: 00001;00002;00003....

iria escolher na outra tabela varios codigos de kits para um mesmo produto, ficando eles em sequencia como ai acima...

é isso?

Aguardo

Bom dia!

Isso mesmo amigo... só o detalhe é que o produto é cadastrado primeiro, só depois eu cadastro o kit. Então não hora do cadastro do kit em que eu seleciono o produto já cadastrado, o código do Kit deverá aparecer no campo "CodKit1" do cadastro de produtos. E ficaria na sequencia como vc colocou caso o determinado produto estivesse presente em mais de um kit.

Não sei se é possível isso, creio que sim, mas no meu pouco conhecimento já tentei de tudo. até agora nada.

Obrigado pela atenção

Mas como vai obter as informações do numero do kit se o mesmo ainda não está cadastrado?

Se o kit estiver ja cadastrado, é possivel fazer como quer..
caso contrário terá que digitar o numero kit manualmente...

Aguardo

A não ser que: Voce crie uma tabela separada e cadastre os numeros dos kit apenas...
para usá-los no momento do cadastro do produto, ai depois disso
na hora de cadastrar o kit, voce teria que usar os numeros pre-fixados nesta nova tabela para isso...

Ex..
Tabela com numeros previamente criados..

Kit00001
Kit00002
Kit00003

insere-se o produto seguido dos numeros escolhidos,,

após isso na hora de inserir o kit, escolhe-se por tais numeros...

Acuse se entendeu e se é assim mesmo

Pois aí que tá.. eu consegui fazer com que o cadastro de produtos verifique se um determinado produto está inserido em algum Kit na tabela ItensDoKit com a seguinte função :

Me.CodKit1 = DLookup("[CodKitVedacao]", "[tblItensDoKit]", "[RefGr]= '" & Me.CódigoInterno & "'")

Ele deu certo, mostrou por exemplo que o produto de código 71112 (vc pode verificar aí no meu form), pertence ao kit K60000. Até aí legal... só que quando eu tenho esse mesmo produto inserido em outro Kit daí eu não consegui fazer com que ele me mostre em sequencia... tipo K60000, K60001 etc..

Entao voce quer que na hora que mostre o produto na tela do form Cadsstro ele mostre a quais kist o produto esta relacionado.. é isso?

Exatamente amigo.. desculpe tanta coisa para tentar explicar... não conseguia achar as palavras corretas.. exatamente isso que eu preciso !!!

Eliseu.. repassei esta duvida ao amigo Criquio. veja se é mais ou menos assim...

Prezado criquio, para auxiliar o colega que estamos tratando é assim:

Ele usa esse codigo para recuperar valores em uma tabela
Me.CodKit1 = DLookup("[CodKitVedacao]", "[tblItensDoKit]", "[RefGr]= '" & Me.CódigoInterno & "'")

Entao o Campo CodKit1 contera valores da tblItensDoKit..
suponnhamos que na tblItensdoKit tenha as seguintes linhas:

CodKitVedacao: 6000 RfGr: 7200
CodKitVedacao: 6001 Rfgr: 7200

Observe que os Dois CodKitVedacao contem o mesmo RFGr (7200)

Entao no campo CodKit1 so aparece o Primeiro valor (6000) ele quer que apareca assim
CodKit1 = 6000; 60001

Bem eliseu... se for como eu entendi, nao e necessario o uso do comando dLockup neste caso, veja porque:

1 - Voce cadastra o produto (sem o relacionamento com nenhum kit)
são varios produstos cadastrados

2 - Voce monta o KIT
Cada kit pode conter varios produtos da tblProdutos...
3 - Ao montar o kit, o produto inserido no kit fica vinculado ao nummero do kit
Então...

Ao consultar o produto, criei uma lstBox com origem na tblItensdoKit, e no SQL coloquei um filtro relacionado com o campo Código interno na tblProdutos (esse numero e adicionado na tabela produtos pelo Campo Código Gr no form...

Então toda vez que abrir o FormCadsstroProduto, a lstView relaciona todos os itens da tblCoddoKit, filtrando pelo Codigo interno...

Assim mostrara sempre todos os Kits ao quais o produto e relacionado...

Nas combo de pesquisa e nos botões de avancar e retroceder apliquei o comando requery na lista
Me.lstCodGr.Requery

Assim sempre ao consultar determinado produto o comando requery faz com que a lstbox atualize filtrando o produto para apresentacao dos kits relacionados

LINK

http://dl.dropbox.com/u/26441349/SCGR.rar

Saudações..

Cara! ficou show de bola... é bom falar com quem sabe... fico te devendo essa.. sei que em se falando de BD talvez não possa te ajudar pois sei menos que vc.. mas quem sabe.. precisando estamos aí. Fico muito agradecido.

Assim como voce um dia fui novato aqui e nao sabia nada, e o fórum ainda me tem ajudado bastante...

Lembre-se não basta eu apenas resolver o seu problema, estude seguindo os passos que trilhei para que entenda a lógica usada...

Lembre-se: antes de escolher um comando a ser usado, repense os caminhos dos aplicativo e o que pretende, para que possa encontrar a solucão, não precisando assim, ficar testando esse ou aquele código...

O Fórum agradece o retorno...
Saudações

Obrigado mais uma vez...