Access - COMPLETAR TABLA CON CÓDIGO VB

   
Vista:

COMPLETAR TABLA CON CÓDIGO VB

Publicado por vestalc (5 intervenciones) el 27/05/2009 15:58:12
Tengo el siguiente problema:

quiero llenar una tabla vacia según los campos de otra tabla. el problema es que lo quiero hacer desde código vb.

el caso es que la tabla1 con tiene un número de registros y necesito coger el valor de uno de sus campos para ir generando registros con ese valor en la tabla2. lo he intentado con el siguiente código, pero me da error en la tabla2, puesto que no la abre de forma que pueda escribirse en ella (es decir en la parte addnew canta error por que no lo permite la instrucción "execute (sql2)"

Dim rst_in_con, rst_cond As New ADODB.Recordset, SQL1, sql2 As String

If nuevoregistro = "si" Then

SQL1 = "Select * from tipos_conducta"
sql2 = "select * from incidencias_conducta"

Set rst_cond = CurrentProject.Connection.Execute(SQL1)
Set rst_in_con = CurrentProject.Connection.Open

While Not rst_cond.EOF
rst_in_con.AddNew
rst_in_con!IDINCIDENCIA = Me.IDINCIDENCIA
rst_in_con!idtipo_conducta = rst_cond!idtipo_conducta
rst_in_con!tipo_conducta = 0
rst_in_con.Save
rst_cond.MoveNext
Wend
End If
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

RE:COMPLETAR TABLA CON CÓDIGO VB

Publicado por marcelo (161 intervenciones) el 27/05/2009 19:50:59
Mejor utiliza una consulta de datos anexados, hace todo de una vez y no debes estar programando iteraciones o loops. El SQL lo ejecutas desde VBA con la instrucción Docmd.RunSQL "......
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

RE:COMPLETAR TABLA CON CÓDIGO VB

Publicado por vestalc (5 intervenciones) el 27/05/2009 23:43:38
Gracias Marcelo, lo voy a probar ahora mismo.
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