hola maestros estoy haciendo un programa que usa dao en codigo(no uso control datos dao) , pero no me deja hacer cosas como borrar ni modificar , solo puedo consultar . lo que hago de parche es usar el control dao y ahi si funciona ,pero no me agrada hacerlo asi. me pueden dar una orientacion ,graciasss.
Dim DB As DAO.Database
Private RS As DAO.Recordset
Private Sub Form_Load()
Set DB = OpenDatabase("C:\vb6 ftp\AUTOS.MDB")
Set RS = DB.OpenRecordset("AUTOS")
/* boton borrar */
Private Sub Command3_Click()
Dim MESAJE As String
MENSAJE = "¿DESEA REALMENTE ELIMINAR ESTE AUTO?"
If MsgBox(MENSAJE, vbYesNo + vbInformation, "PRECAUCION") = vbYes Then
'datos.Recordset.Delete /* si pongo un control data de ado funciona
'datos.Refresh
RS.Delete /* el error me lo marca aqui "error 3551 , operacion no valida para este tipo de objeto */
LIMPIAR
inabilitarb
Else
LIMPIAR
inabilitarb
End If
End S
