Adodc.Recordset para mais de uma tabela

[Guest --Marco Antonio --]

Boa tarde a todos!

Tenho um projeto em VB6 com banco de dados em Access e estou usando controles vinculados.

Existe alguma maneira de eu carregar textboxes e gravar registros em duas tabelas diferentes usando apenas um recordset?

Exemplo:

Tenho os campos 1, 2 e 3. Eu gravo os campos 1, 2 e 3 nas colunas campo1, campo2, e campo3 da tabela 1. Mas também preciso dos registros dos campos 2 e 3 nas colunas campo2 e campo3 da tabela 2.

Como faço isso usando apenas um Adodc.recordset?

Desde já agradeço a atenção.

[raphael_suporte]

assim já usei com o SQL, abrindo e fechando cada alteração que eu fazia com o Rs.... assim mais ou menos

Dim rs As New ADODB.Recordset

rs.Open "SELECT * FROM Tabela_Clientes WHERE TXT_Codigo_cliente = '" & Cadastro & "'", CN, 1, 3
     If Not rs.EOF Then
           Campo1.text = rs("TXT_Codigo_Operador")
      End If
    rs.Close

depois abriria para outra tabela...

[Guest --Marco Antonio --]

Raphael eu não entendi.

A que se refere o "CN" ? E como eu faço para gravar na tabela usando o "rs"?

[raphael_suporte]

CN foi o Nome que usei para minha conexão "Dim CN As ADODB.Connection"

no exemplo acima eu estou pegando a informação de uma tabela e colocando em um textbox.

para fazer ao Contrario

você irá realizar a pesquisa e inverter

Campo1.text = rs("TXT_Codigo_Operador")

para

rs("TXT_Codigo_Operador") = Campo1.text

[Guest --Marco Antonio --]

Ah sim, entendi!

Bom eu consegui também resolver o meu problema. Eu criei uma consulta de atualização entre as tabelas dentro do Access mesmo. Assim sempre que eu crio registros em uma tabela, a outra se atualiza automaticamente.

Mas fica aí a sua dica para os meus próximos projetos. Muito obrigado!