pesoal tenho a seguinte duvida

como vou fazer isto

tenho uma tabela e nela eu uso pra alterar os registro o seguinte codigo

            If MsgBox("Confirma Alteração ?", vbYesNo + vbDefaultButton2 + vbQuestion, "Atenção") = vbYes Then
    rs.Index = "idxv"
    rs.Seek "=", T1.Text
    rs.Edit
    rs!codigo = T1.Text
    rs!Data = T2.Text
    rs!nome = T3.Text
    rs!corte = T4.Text
    rs!chapa = T5.Text
    rs!qtd = T6.Text
    rs!valor = T7.Text
    rs!obs = T8.Text
    rs!codpro = t9.Text
    rs.Update
ate ai bl tudo certo so q agora eu tenh mais duas tabelas a tbcaixa e tbestoque

( quando faço uma inclusao de um registro ele inclui nas tres tabela "tbcompra, tbcaixa e tbestoque")

agora eu preciso q quando eu alterar um registro na tbcompra ele tambem alterar nas outras dua tabelas(tbcaixa e tbestoque) como prossigo com o codigo acima?

uso conexao DAO e aceess 2000

 

Miner, boa tarde

 

     Acho eu que voce terá que executar a mesma operação para cada tabela, a menos que use um banco de dados tipo SQLSERVER o similar e crie um procedure (TRIGGER) para atualizar as demais tabelas.

cara tambem pesei q ia dar certo mas daesse erro aqui logo q eu indexo a tabela

    Set rscaixa = bd.OpenRecordset("select * from tbcaixa")
    rscaixa.Index = "caixa"

help pessoal alguem pode me dar uma ajuda ? uma idéia?

Eu agradeço

 

Leia sobre sql comando  "INNER JOIN" , para exclusão dá certo ....