منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] الحذف المتعدد من قاعدة البيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] الحذف المتعدد من قاعدة البيانات (/showthread.php?tid=23289)

الحذف المتعدد من قاعدة البيانات - محمد اسماعيل - 12-01-18

السلام عليكم

عندي قاعدة بيانات احذف صف صف وعندي عمود شيك بوكس بها اريد كود لحذف كل خلايا التي تم عمل شيك لها

دة كود الحذف العادي  لصف واحد علما بان هناك جداول مرتبطة


PHP كود :
 Try
            If DataGridView1.RowCount <= 0 Then
                Exit Sub
            End If
            Dim I As Integer = DataGridView1.CurrentCell.RowIndex
            con.Open()
            Dim cmd = New OleDbCommand("DELETE FROM tb1 where ID_mail like " & DataGridView1.Rows(I).Cells(0).Value & " and clien_mail like '" & DataGridView1.Rows(I).Cells(1).Value.ToString & "'", con)
            cmd.ExecuteNonQuery()
            con.Close()
            DataGridView1.Rows.RemoveAt(DataGridView1.CurrentRow.Index)
            MsgBox("تمت عملية الحذف في قاعدة البيانات بنجاح", 64 + 524288, "حذف سجل من كلا الجدولين")
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub 


RE: الحذف المتعدد من قاعدة البيانات - ibraheam - 12-01-18

وعليكم السلام
اعمل لوب على جميع صفوف الكرد فيو وفي حالة كانت قيمة عمود (checkbox) تساوي (true) نفذ السطور اعلاه الخاصة بالحذف

للمزيد ارفق مثال وسنساعدك انشاء الله

تحياتي

RE: الحذف المتعدد من قاعدة البيانات - awidan76 - 12-01-18

متابع الموضوع

RE: الحذف المتعدد من قاعدة البيانات - عبدالله الدوسري - 13-01-18

ملاحظة :
DELETE FROM tb1 where ID_mail like

من الأفضل إستخدام = بدلاً من like

RE: الحذف المتعدد من قاعدة البيانات - محمد اسماعيل - 13-01-18

(13-01-18, 01:17 AM)khodor1985 كتب : السلام عليكم أخي العزيز ورحمة الله وبركاته
ممكن أخي العزيز  ترفق مثال مصغر عن المشروع أو الفكرة للتعديل عليها.
لقد قمنا بتصميم مثال بناء لطلبكم
المثال  :
كود الحذف المتعدد من الجريد فيو :
PHP كود :
Private Sub deleteMultiRows()

        Dim id As Integer = 0
        For Each row As DataGridViewRow In gvEmployee.Rows
            If row.Cells(4).Value = True Then
                id = Convert.ToInt32(row.Cells(0).Value).ToString()

                query = "Delete From Employee Where Id=@Id"
                cmd = New OleDbCommand(query, con)
                cmd.Parameters.Add("@Id", OleDbType.Integer).Value = id

                con.Open()
                cmd.ExecuteNonQuery()
                con.Close()
            End If
        Next

        MessageBox.Show("Deleted Successfully")
    End Sub 

وفقك الله لكل خير فعلا هذا هو المطلوب

RE: الحذف المتعدد من قاعدة البيانات - awidan76 - 15-01-18

جزاك الله خير اخي خدور
اشكرك من كل قلبي

وتسلم على المشاركة والمساعدة
جعله الله في ميزان حسناتك

احترمك