PROBLEMA COM RELACIONAMENTO DE TABELAS ACCESS

MASTER2020 17/02/2010 20:39:55
#334627
ola pessoal estou com um problema pra salvar o registro de duas tabellas relacionadas, na verdade eu queria fazer tudo de uma ves, vou explicar

tenho duas tabelas

tblreceitanome --->sao armazenadas os nomes de receitas com os seguintes campos

codreceita,nome,origem,preparo

segunda tabela ea tblingredientes
nesta tem
codingredientereceita --relacionado com o campo codreceita
ingrediente eo peso

qdo vou salvar faco tudo de uma so vez assim:

Private Sub cmdsalvar_Click()

rs.AddNew [ô]tblreceitanome

rs.Fields(1) = [Ô][Ô] & txtnome.Text
rs.Fields(2) = [Ô][Ô] & txtorigem.Text

With mslista
For F = 1 To .Rows - 1
rsingrediente.AddNew [ô]tblingredientes
rsingrediente([Ô]codingredientereceita[Ô]) = .TextMatrix(F, 0)
rsingrediente([Ô]ingrediente[Ô]) = .TextMatrix(F, 1) [ô]Coluna 1
rsingrediente([Ô]peso[Ô]) = .TextMatrix(F, 2) [ô]Coluna 2

rsingrediente.Update [txt-color=#e80000]<da erro aki >[/txt-color]
Next F
End With
rs.Update

o erro fala q nao existe campo q faca referencia na tblreceitanome
rsingrediente.Update <errro>

como estou fazendo tudo de uma ves eu gero o numero do codigoda receita
assim
txt.Text = rs.RecordCount + 1
que no caso qdo estou criando um registro o codigo da tblreceitanome nao existe, entao eu gero ele no momento que adiciono no msflex. mas da erro




CLEVERTON 17/02/2010 22:08:35
#334634
tenta assim


rs.AddNew [ô]tblreceitanome

rs.Fields(1) = [Ô][Ô] & txtnome.Text
rs.Fields(2) = [Ô][Ô] & txtorigem.Text
rs.Update

With mslista
For F = 1 To .Rows - 1
rsingrediente.AddNew [ô]tblingredientes

rsingrediente([Ô]codingredientereceita[Ô]) = .TextMatrix(F, 0)
rsingrediente([Ô]ingrediente[Ô]) = .TextMatrix(F, 1) [ô]Coluna 1
rsingrediente([Ô]peso[Ô]) = .TextMatrix(F, 2) [ô]Coluna 2

rsingrediente.Update
Next F
End With
MASTER2020 18/02/2010 19:50:14
#334739
Cleverton o erro e porque a tblreceitanome o codigo receita e autonumerico, entao qdo vou adicionar os registros nas duas tabelas a segunda da erro porque, ainda nao existe o codreciita nome, oq faco
MASTER2020 21/02/2010 17:27:21
#334977
pessoal o fonte esta aki
DUSK 21/02/2010 18:05:31
#334979
Resposta escolhida
PATO, acho soh q vc inverteu o relacionamento.
Ve c desse jeito funciona..
MASTER2020 21/02/2010 20:56:09
#334986
Dusk testei uma ves fivou otimo, farei mais uns testes pra ficar redondo ja retorno
MASTER2020 23/02/2010 19:09:41
#335173
Ola Dusk, muito obrigado funcionou perfeitamente, eu demorei porque eu queria ter certeza,vlw
Tópico encerrado , respostas não são mais permitidas