تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
حذف صف من الداتاقريد فيو وقاعدة البيانات
#1
السلام عليكم ورحمة الله وبركاته

اخواني عندي داتاقريدفيو مرتبطة بجدول في قاعدة بيانات sql  كما يوجد عندي textbox  الذي أريده عندما أكتب قيمة في textbox  يحدث عملية اختيار الصف الذي يحتوي على هذه القيمة ( يعني يعمل select  للصف ) ثم يقوم بحذفه من الداتاقريدفيو وكذلك من قاعدة البيانات

آسف على الاطالة

دمتم بود
الرد
تم الشكر بواسطة: ابراهيم ايبو , asemshahen5 , alshandodi
#2
هذ كود للحذف مباشرة من الداتا جرد فيو وقاعدة البيانات بدلالة السطر المحدد
يتبقى عليك فقط تعويض اسم الجدول واسم الحقل وباستدعاء الامر وضع اسم الداتا جرد فيو


كود :
Public Sub DeleteRow(ByVal DGV As DataGridView)
       Dim Position As Integer = DGV.CurrentRow.Index
       Dim ID_Position As Integer = DGV.Rows(Position).Cells("FieldName").Value
       Dim Cmd As New SqlCommand
       With Cmd
           .Connection = Con
           .CommandType = CommandType.Text
           .CommandText = "Delete  From tableName Where FieldName = @FieldName"
           .Parameters.Clear()
           .Parameters.AddWithValue("@FieldName", SqlDbType.Int).Value = ID_Position
       End With
       If Con.State = 1 Then Con.Close()
       Con.Open()
       Cmd.ExecuteNonQuery()
       Con.Close()
       MsgBox("تم حذف بيانات السجل بنجاح.", MsgBoxStyle.Information, "حذف")
       Cmd = Nothing
   End Sub
الاستدعاء


كود :
If MessageBox.Show("هل أنت متأكد من انك تريد مواصلة عملية الحذف؟", "تنبيه", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.No Then
           Exit Sub
       Else
           DeleteRow(DGVName)
       End If
الرد
تم الشكر بواسطة: ابراهيم ايبو , asemshahen5 , alshandodi
#3
(09-05-20, 09:33 PM)aljzazy كتب : هذ كود للحذف مباشرة من الداتا جرد فيو وقاعدة البيانات بدلالة السطر المحدد
يتبقى عليك فقط تعويض اسم الجدول واسم الحقل وباستدعاء الامر وضع اسم الداتا جرد فيو


كود :
Public Sub DeleteRow(ByVal DGV As DataGridView)
       Dim Position As Integer = DGV.CurrentRow.Index
       Dim ID_Position As Integer = DGV.Rows(Position).Cells("FieldName").Value
       Dim Cmd As New SqlCommand
       With Cmd
           .Connection = Con
           .CommandType = CommandType.Text
           .CommandText = "Delete  From tableName Where FieldName = @FieldName"
           .Parameters.Clear()
           .Parameters.AddWithValue("@FieldName", SqlDbType.Int).Value = ID_Position
       End With
       If Con.State = 1 Then Con.Close()
       Con.Open()
       Cmd.ExecuteNonQuery()
       Con.Close()
       MsgBox("تم حذف بيانات السجل بنجاح.", MsgBoxStyle.Information, "حذف")
       Cmd = Nothing
   End Sub
الاستدعاء


كود :
If MessageBox.Show("هل أنت متأكد من انك تريد مواصلة عملية الحذف؟", "تنبيه", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.No Then
           Exit Sub
       Else
           DeleteRow(DGVName)
       End If
مشكور اخي العزيز وبارك الله تم المطلوب بمساعدتك الله يجعله في موازين حسناتك
الرد
تم الشكر بواسطة: ابراهيم ايبو , asemshahen5 , alshandodi


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تنفيذ استعلام حذف البيانات في جدول قاعدة بيانات سيكوال سيرفر باستخدام الكود في فجوال momani33 4 80 28-05-20, 12:46 AM
آخر رد: اسامه الهرماوي
  [سؤال] تصدير البيانات منه 1 32 27-05-20, 10:46 PM
آخر رد: منه
  مشكلة معقدة بعرض البيانات بالدتاجريد على ما فكرت فيها لم اجد لها حل ابو محمد محمد محمد 10 256 24-05-20, 12:16 PM
آخر رد: ابو محمد محمد محمد
  [سؤال] مشكلة في اتصال قاعدة البيانات اكسس mazentq 9 185 24-05-20, 08:45 AM
آخر رد: mazentq
  [VB.NET] التعديل على كود لقرائة باقي المعلومات من قاعدة البيانات khairallah 1 59 24-05-20, 03:19 AM
آخر رد: اسامه الهرماوي
  [VB.NET] كيف يتم تخزين المعلومات الموجودة في الداتا قريد غير متصلة بقاعدة البيانات rochdi191 8 137 16-05-20, 08:23 AM
آخر رد: عبدالله الدوسري
  سؤال في طريقة التعامل مع قاعدة البيانات عند تحزيم المشروع adnan gharbi 4 276 15-05-20, 01:03 PM
آخر رد: adnan gharbi
  [VB.NET] كيف يتم حفظ صورة في datagridiew غير متصل بقاعدة البيانات rochdi191 5 153 14-05-20, 08:30 PM
آخر رد: rochdi191
  سؤال حول قواعد البيانات اليوم السابع 0 45 13-05-20, 04:29 AM
آخر رد: اليوم السابع
  ظهور رسالة خطأ عند إجراء النسخ الاحتياطي لقاعدة البيانات momiana1 0 64 11-05-20, 04:14 AM
آخر رد: momiana1

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم