Visual Basic - Duda con varias tablas de access en VB 6

Life is soft - evento anual de software empresarial
   
Vista:

Duda con varias tablas de access en VB 6

Publicado por Marco (11 intervenciones) el 17/04/2012 18:25:46
Tengo una base de con la que trabajo en VB 6, y esta es la función que tengo para guardar información en la tabla Matriz de la base de datos

Set cn = New ADODB.Connection
cn.Open "Provider = Microsoft.Jet.OLEDB.4.0; " & _
"Data Source = F:\VB\BD\BDVinc.mdb; "


q = "Insert into Matriz" & _
"(NoPersonal, ApellidoPaterno, ApellidoMaterno, Nombre, Puesto)" & _
"Values" & _
"('" & UserForm1.TextBox1.Text & "','" & UserForm1.TextBox2.Text & "','" & UserForm1.TextBox3.Text & "','" & UserForm1.TextBox4.Text & "','" & UserForm1.TextBox5.Text & "')"

Set rs = New ADODB.Recordset
rs.Open q, cn, adOpenStatic


Aquí todo bien, pero si tengo otras tablas en la misma base de datos, quisiera saber cómo debo de agregar el código para hacer esto, son 3 tablas mas.

Por favor como le puedo hacer.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Fabio Colan

Duda con varias tablas de access en VB 6

Publicado por Fabio Colan fjc2805@hotmail.com (1 intervención) el 21/03/2013 22:01:22
pathBD = App.Path & "\Base.mdb"
'conexion con la base
BD.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & pathBD & ";"
'conexion con la tabla
rs.Open "select * from Tabla", Base, adOpenDynamic, adLockOptimistic

rs.AddNew ' agrega datos
rs("Encabezado_tabla") = Text1.Text
rs.Update 'actualiza tabla
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar