[hafid33]

(01-04-22, 08:13 PM)SaedAmer كتب :

(01-04-22, 07:10 PM)hafid33 كتب :

(01-04-22, 05:30 AM)SaedAmer كتب : اعمل جدول جديد يكون ارشيف و ضع محتوايات الصف في string و احذف الصف من الدول الحالي و ضيفه مرة اخرة في الجدول الجديد

كيف احفظ هدا الصف هنا وفي قاعدة البيانات مثلا ارشيف كما قلت

---

او كيف انقل هدا الصف هنا باستعمال زر

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

كود :

Dim poss As Integer = DataGridView2.CurrentRow.Index
Dim p0 = DataGridView2.Rows(poss).Cells(0).Value
Dim p1 = DataGridView2.Rows(poss).Cells(1).Value
Dim p2 = DataGridView2.Rows(poss).Cells(2).Value
Dim p3 = DataGridView2.Rows(poss).Cells(3).Value
Dim p4 = DataGridView2.Rows(poss).Cells(4).Value

الطريقة التانية :

كود :

      Dim ssmms As String = ""
       Dim xx As Integer = DataGridView2.CurrentRow.Index

       Dim x(DataGridView2.ColumnCount) As String
       For ii = 0 To DataGridView2.ColumnCount
           Try
               x(ii) = DataGridView2.Rows(xx).Cells(ii).Value.ToString
               Application.DoEvents()
           Catch
           End Try
       Next





       For ii = 0 To DataGridView2.ColumnCount
           'Dim x(DataGridView1.Rows(xx).Cells(ii).Value.ToString) As String
           'MsgBox(x(ii))
           Try

               ssmms = ssmms + (x(ii) & ",")


           Catch
           End Try
       Next

       MsgBox(ssmms)

الف شكر اخي لكن كيف احفظه في قاعدة البيانات في جدول ارشيف ويظهر في dgv 2

---

هدا الكود الدي اجلب به جدول قاعدة البيانات واضع قاعدة البيانات في

dgv

كود :

  da = New OleDbDataAdapter("select*from vente ", con)
       dt = New DataTable
       da.Fill(dt)
       DataGridView3.DataSource = dt

---

المشكل هو كيف ساضع الصفوف في الكود الدي كتبته لي يعني كيف اجلبه من قاعدة البيانات واضعه في جدول الارشيف