Jump to content
Fórum Script Brasil
  • 0
Sign in to follow this  
Guest --Marco Antonio --

Adodc.Recordset para mais de uma tabela

Question

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.

Share this post


Link to post
Share on other sites

4 answers to this question

Recommended Posts

  • 0

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...

Share this post


Link to post
Share on other sites
  • 0
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"?

Share this post


Link to post
Share on other sites
  • 0

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

Share this post


Link to post
Share on other sites
  • 0
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!

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Sign in to follow this  



  • Forum Statistics

    • Total Topics
      148585
    • Total Posts
      644290
×
×
  • Create New...