Error al eliminar registro en datagrid
Hola amigos
Tengo un problema con el datagrid, el éste muestro los registros de una tabla de access, y cuando voy a eliminar un registro con "Supr" (lo hago en el evento BeforeDelete, me sale un mensaje de error:
Row cannot be located for updating. Some values may have been changed since it was last read....
Como tengo dos tablas relacionadas, debo eliminar el registro 1ºen una y después en la otra,...
Private Sub DataGrid1_BeforeDelete(Cancel As Integer)
Dim sqldel As String
Dim sql As String
Dim val As Integer
val = DataGrid1.Columns(1)
sqldel = "Delete * from DetallesFacturas where idfactura=" & val & ""
cnBase.Execute sqldel
sql = "Delete * from Facturas where nombrecompleto= '" & Label1.Caption & "' and idfactura=" & val & ""
cnBase.Execute sql
End Sub
¿Qué debo hacer para que esto no pase?
Tengo un problema con el datagrid, el éste muestro los registros de una tabla de access, y cuando voy a eliminar un registro con "Supr" (lo hago en el evento BeforeDelete, me sale un mensaje de error:
Row cannot be located for updating. Some values may have been changed since it was last read....
Como tengo dos tablas relacionadas, debo eliminar el registro 1ºen una y después en la otra,...
Private Sub DataGrid1_BeforeDelete(Cancel As Integer)
Dim sqldel As String
Dim sql As String
Dim val As Integer
val = DataGrid1.Columns(1)
sqldel = "Delete * from DetallesFacturas where idfactura=" & val & ""
cnBase.Execute sqldel
sql = "Delete * from Facturas where nombrecompleto= '" & Label1.Caption & "' and idfactura=" & val & ""
cnBase.Execute sql
End Sub
¿Qué debo hacer para que esto no pase?
