bindingsource.removecurrent

08/03/2007 - 08:48 por dani | Informe spam
Buenas, tengo un bindingnavigator al que le he deshabilitado el boton de
guardar para ponerle código personalizado. En mi caso un mensaje de
advertencia para indicarle que se va a borrar el registro.

Cuando acepta, en teoria, lo borra. Digo en teoria porque si bien se elimina
del navigator (no aparece el registro), en la base de datos aún aparece.

Este es el código:
If MessageBox.Show("Atencion, se va a eliminar el registro actual",
"Eliminación Registro", MessageBoxButtons.YesNo, MessageBoxIcon.Warning,
MessageBoxDefaultButton.Button1) = MsgBoxResult.Yes Then

Try

Me.AU_NO01BindingSource.RemoveCurrent()



MsgBox("Registro eliminado", MsgBoxStyle.Information, "Eliminacion de
Registros")

Catch ex As Exception

MsgBox(ex.Message)

End Try


End If


¿Me falta algo para que lo borre definitivamente?
Gracias
 

Leer las respuestas

#1 dani
08/03/2007 - 10:23 | Informe spam
Ya está solucionado, me faltaba realizar la operación de guardar:
If MessageBox.Show("Atencion, se va a eliminar el registro actual",
"Eliminación Registro", MessageBoxButtons.YesNo, MessageBoxIcon.Warning,
MessageBoxDefaultButton.Button1) = MsgBoxResult.Yes Then

Try

Me.AU_NO01BindingSource.RemoveCurrent()

Me.Validate()

Me.AU_NO01BindingSource.EndEdit()

Me.AU_NO01TableAdapter.Update(Me.PlusvaliaDataSet.AU_NO01)

MsgBox("Registro eliminado", MsgBoxStyle.Information, "Eliminacion de
Registros")

Catch ex As Exception

MsgBox(ex.Message)

End Try

End If



"dani" escribió en el mensaje
news:
Buenas, tengo un bindingnavigator al que le he deshabilitado el boton de
guardar para ponerle código personalizado. En mi caso un mensaje de
advertencia para indicarle que se va a borrar el registro.

Cuando acepta, en teoria, lo borra. Digo en teoria porque si bien se
elimina del navigator (no aparece el registro), en la base de datos aún
aparece.

Este es el código:
If MessageBox.Show("Atencion, se va a eliminar el registro actual",
"Eliminación Registro", MessageBoxButtons.YesNo, MessageBoxIcon.Warning,
MessageBoxDefaultButton.Button1) = MsgBoxResult.Yes Then

Try

Me.AU_NO01BindingSource.RemoveCurrent()



MsgBox("Registro eliminado", MsgBoxStyle.Information, "Eliminacion de
Registros")

Catch ex As Exception

MsgBox(ex.Message)

End Try


End If


¿Me falta algo para que lo borre definitivamente?
Gracias

Preguntas similares