هذا الكود يرفض حفظ الحذف في قاعدة البيانات
يحذفه من الجدول وعند فتح الفوم يعود من جديد
يحذفه من الجدول وعند فتح الفوم يعود من جديد
PHP كود :
[size=small] Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click[/size]
[size=small] If MsgBox("هل انت متأكد من عملية حذف السجل : " & DataGridView1.CurrentRow.Cells(1).Value, MsgBoxStyle.YesNo, "") = MsgBoxResult.Yes Then[/size]
[size=small] Dim Ajouter As Integer = DataGridView1.CurrentRow.Index[/size]
[size=small] Dim Pos As Integer = bsData.Position[/size]
[size=small] Dim Row As DataRow = CType(bsData.Current, DataRowView).Row[/size]
[size=small] PictureDataTable.Rows(Ajouter).Delete()[/size]
[size=small] bsData.Position = Pos[/size]
[size=small] PictureDataTable.AcceptChanges()[/size]
[size=small] MessageBox.Show("تمّت بنجاح عملية حذف بيانات الكتاب", "عملية الحذف", MessageBoxButtons.OK, MessageBoxIcon.Asterisk, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign)[/size]
[size=small] End If[/size]
[size=small] End Sub[/size]