hize el index en access 2010 y lo formatie a 2000
no se porque me sale error si le puse el index A Codigo
Código
Data1.Recordset.Index = "COD" Data1.Recordset.Seek "=", COD If Data1.Recordset.NoMatch = True Then Data1.Recordset.AddNew Data1.Recordset.Fields("Codigo") = txtcodigo Data1.Recordset.Fields("Descripción") = txtdescripcion Data1.Recordset.Fields("Aula") = txtaula Data1.Recordset.Update MsgBox ("Registro Agregado") Call Limpiar txtcodigo.SetFocus Else MsgBox ("Registro Exsitente")