Pregunta: | 26673 - PROBLEMAS CON OPENRECORDSET |
Autor: | idoia puente |
Hola a todos,
Necesito solucionar un problema que tengo al abrir un recordset con Access 2000. No se si está equivocada sintaxis en OpenRecordset o me falta añadir algo. Me da un error el la linea mitabla.Edit - No se encontró el método o el dato miembro. Option Compare Database Option Explicit Private Sub Comando0_Click() Dim mibase As Database Dim mitabla As Recordset Set mibase = DBEngine.Workspaces(0).Databases(0) Set mitabla = mibase.OpenRecordset("material", DB_OPEN_TABLE) mitabla.MoveFirst Do Until mitabla.EOF If mitabla!codigo = "1111" Then mitabla.Edit mitabla!codigo = "7777" mitabla.Update End If mitabla.MoveNext Loop mitabla.Close End Sub Gracias por vuestra ayuda. |
Respuesta: | Ernesto |
en ves de usar esto
Set mitabla = mibase.OpenRecordset("material", DB_OPEN_TABLE) Prueba esto Set mitabla = mibase.OpenRecordset("material", DB_OPEN_DYNASET) |