La Web del Programador: Comunidad de Programadores
 
    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)