الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

طريقة الحذف والتعديل والاضافة في قرد فيو

بدأه sarha في 14 مايو 2011 · 3 رد · 618 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

اخواني ياليت الي يعرف كيف اعمل طريق حذف وتعديل واضافه .. وطريق الحذف تكون عن طريقة تشيك بوكس لما نسوي تشك على سجيل في القرد فيو يتم حذفة وفي حالات تم التاشير على اكثر من سجل يتم حذفها ..

ياليت الي عنده خبره في هذه الموضوع مايبخل علينا في الشرح وطبعن كل العمليات ياليت تكون على دتا قرد فيو ولكم جزيل الشكر والتقدير والله يجعله في ميزان حسناتكم

#2

السلام عليكم ورحمه الله وبركاته

اختي فكرة الحذف بسيط ماعليك الا اضافه عمود من نوع DataGridViewCheckBoxColumn وهذا هو الكود

Dim cmd As New SqlCommand("Delete From MyTable Where ID=@ID", conn)
    	For Each row As DataGridViewRow In DataGridView1.Rows
        	If Convert.ToBoolean(row.Cells(3).Value) Then
            	cmd.Parameters.AddWithValue("ID", row.Cells(0).Value)
            	conn.Open()
            	cmd.ExecuteNonQuery()
            	conn.Close()
            	cmd.Parameters.Clear()
        	End If
    	Next

نقوم بعمل دوران لجميع الصفوف ومن ثم نفحص هل العمود في الصف الحالي تم تأشيره, اذا كان مؤشر نقوم بحذف هذا الصف بحسب الرقم وهكذا ...

WindowsApplication1.zip

1

.:: Wish to become better and better ::.

#3
VB Helper كتب:

السلام عليكم ورحمه الله وبركاته

اختي فكرة الحذف بسيط ماعليك الا اضافه عمود من نوع DataGridViewCheckBoxColumn وهذا هو الكود

Dim cmd As New SqlCommand("Delete From MyTable Where ID=@ID", conn)
    	For Each row As DataGridViewRow In DataGridView1.Rows
        	If Convert.ToBoolean(row.Cells(3).Value) Then
            	cmd.Parameters.AddWithValue("ID", row.Cells(0).Value)
            	conn.Open()
            	cmd.ExecuteNonQuery()
            	conn.Close()
            	cmd.Parameters.Clear()
        	End If
    	Next

نقوم بعمل دوران لجميع الصفوف ومن ثم نفحص هل العمود في الصف الحالي تم تأشيره, اذا كان مؤشر نقوم بحذف هذا الصف بحسب الرقم وهكذا ...

==============================================

اخي العزيز ياليت تشرح لي شو فائدة هذه االاكواد

Me.MyTableTableAdapter.Fill(Me.MyDBDataSet.MyTable)

Bind()

DataGridView1.Columns.Add(New DataGridViewCheckBoxColumn())

DataGridView1.Columns(3).HeaderText = "Select"

=====================================

وكمان هذه الكود

Sub Bind()

Dim adpt As New SqlDataAdapter("Select * From MyTable", conn)

Dim ds As New DataSet()

adpt.Fill(ds)

DataGridView1.DataSource = ds.Tables(0)

End Sub

هل تقصد بهذه الدالة انها تقوم باعدت تحديث البيانات بعد عملية الحذف ؟؟ وياليت توضح لي اخي العزيز ... طريقة التعديل والاضافة والله يجعلة في ميزان حسناتك يااااااااااارب

تم تعديل هذه المشاركة بواسطة sarha في 14 مايو 2011 في 11:58

#4

السلام عليكم ورحمه الله وبركاته

اختي بالنسبه للكود الثاني ماهو الا يقوم بجلب البيانات من جدول معين وعرضه في اداه ال DataGridView ... اما الداله الكود الاول يستخدم داله العرض Bind ومن ثم تضيف عمود من نوع DataGridViewCheckBoxColumn ليتم من خلاله تحديد العناصر

.:: Wish to become better and better ::.

مواضيع مشابهة