Eliminar fila en Bd access desde VS.net
Publicado por juarez (7 intervenciones) el 10/11/2016 00:34:37
Que tal, estoy tratando de eliminar una fila desde código mediante una instrucción SQL pero no hace nada, dejo el código haber si pueden ayudarme.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub ButtonEliminar_Click(sender As Object, e As EventArgs) Handles ButtonEliminar.Click
Dim NoFila As DataGridViewRow = Me.DataGridViewSIC.CurrentRow()
Dim cnn1 As New OleDbConnection("PROVIDER=MICROSOFT.ACE.OLEDB.12.0; DATA SOURCE=C:\Users\Davidd\Desktop\Bienes_Suministros.accdb")
Dim numero As String = DataGridViewSIC.CurrentRow.Cells("FECHA").Value
Dim CERRAR As String
CERRAR = MsgBox("¿ELIMINAR SIC " & numero & " ?", MsgBoxStyle.YesNo)
If CERRAR = MsgBoxResult.Yes Then
cnn1.Open()
DataGridViewSIC.Rows.Remove(NoFila)
SQL3 = "DELETE * FROM Registro_SIC WHERE FECHA = " & numero & ""
Dim CMD As New OleDbCommand(SQL3, cnn1)
CMD.ExecuteNonQuery()
MsgBox("REGISTRO ELIMINADO")
cnn1.Close()
End If
End Sub
Valora esta pregunta
0
