Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: R3Z en 22 Julio 2015, 08:07 am



Título: Alguien Sabe Por Que Me Da Error? VB6
Publicado por: R3Z en 22 Julio 2015, 08:07 am
Tengo Un Base de datos con control data

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
  1. Data1.Recordset.Index = "COD"
  2. Data1.Recordset.Seek "=", COD
  3. If Data1.Recordset.NoMatch = True Then
  4. Data1.Recordset.AddNew
  5. Data1.Recordset.Fields("Codigo") = txtcodigo
  6. Data1.Recordset.Fields("Descripción") = txtdescripcion
  7. Data1.Recordset.Fields("Aula") = txtaula
  8. Data1.Recordset.Update
  9. MsgBox ("Registro Agregado")
  10. Call Limpiar
  11. txtcodigo.SetFocus
  12. Else
  13. MsgBox ("Registro Exsitente")
  14.