[ahmed99]

رجو شرح كيفية ترحيل فاتورة الشراء الى قاعدة البيانات من الداتاجريد مع تعديل كميات المنتجات في جدول المنتجات وفي حالة وجود منتجات جديدة في الفاتورة يتم اضافتها مسبقا
 وارجو تصحيح الكود التالي
لان العميلة تتم ولكن عند الضغط مرة اخرى يضهر خطاء في الكود التالي
Dim nu, con, s, o As Integer

        ds.Clear()

        Dim pro, kn As String

       

            For i = 0 To DataGridView1.RowCount - 1

                nu = DataGridView1.Rows(i).Cells(0).Value

                pro = DataGridView1.Rows(i).Cells(3).Value

                Cmd.Parameters.Add(New OleDbParameter("nu", OleDbType.Integer)).Value = 

                Conn.Open()

                Cmd.ExecuteNonQuery()

                sqls = "update  product set product = produc, kind = knd, cont = con where num = " & nu

                Cmd = New OleDbCommand(sqls, Conn)

                cm = New OleDbCommandBuilder(Da)

                Da.Fill(ds, "product")

                kn = DataGridView1.Rows(i).Cells(4).Value

                con = DataGridView1.Rows(i).Cells(5).Value

                Cmd.Parameters.Add(New OleDbParameter("produc", OleDbType.VarChar)).Value = pro

                Cmd.Parameters.Add(New OleDbParameter("knd", OleDbType.VarChar)).Value = kn

                Cmd.Parameters.Add(New OleDbParameter("con", OleDbType.Integer)).Value = con

                Conn.Close()

            Next