Ejecura una consulta en un formulario
Publicado por switch.2h (13 intervenciones) el 02/04/2007 17:37:53
Hola a tod@s
mi pregunta es la siguente, ojala que me puedan ayudar
como llamo a una consulta por codigo sql desde un formulario
tengo algo mas o menos haci:
Dim rst_access As ADODB.Recordset
Set rst_access = New ADODB.Recordset
rst_access.Open "select * from [Consulta1]", chica
chica.Execute "delete from Consulta1;"
Dim stUpd As String
With rst_access
.MoveFirst
Do While Not .EOF
stUpd = "INSERT INTO Consulta1 (rut,sede) VALUES('" & .Fields("rut") & "','" & .Fields("sede") & "');"
chica.Execute stUpd
.MoveNext
Loop
End With
pero este codigo me muestra el siguente error:
"no se puede utilizar una consulta de accion como origen de fila"
si alguen me puede ayudar, se agradece mucho
mi pregunta es la siguente, ojala que me puedan ayudar
como llamo a una consulta por codigo sql desde un formulario
tengo algo mas o menos haci:
Dim rst_access As ADODB.Recordset
Set rst_access = New ADODB.Recordset
rst_access.Open "select * from [Consulta1]", chica
chica.Execute "delete from Consulta1;"
Dim stUpd As String
With rst_access
.MoveFirst
Do While Not .EOF
stUpd = "INSERT INTO Consulta1 (rut,sede) VALUES('" & .Fields("rut") & "','" & .Fields("sede") & "');"
chica.Execute stUpd
.MoveNext
Loop
End With
pero este codigo me muestra el siguente error:
"no se puede utilizar una consulta de accion como origen de fila"
si alguen me puede ayudar, se agradece mucho
Valora esta pregunta


0