[ali_ahmed12]

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

كود :

 If labell.Text = "" Then
           MessageBox.Show("الرجاء ادخال اسم المنتج")
           Exit Sub
       End If
       If Qty.Text = "" Then
           MessageBox.Show("الرجاء ادخال الكمية")
           Exit Sub
       End If
       'Dim DT As New DataTable
       dt.Clear()
       Dim da As New SqlDataAdapter("select *from PRODUCTS where label='" & labell.Text & "'", Module1.con)
       da.Fill(dt)
       If dt.Rows.Count > 0 Then
           MessageBox.Show("اسم منتج موجود مسبقا ")
       Else
           Dim DR = dt.NewRow
           DR!label = labell.Text
           DR!label_product = label_product.Text
           DR!UNIT = UNIT.Text
           DR!date = DateTimePicker1.Value
           DR!Qty = Val(Qty.Text)
           DR!TKLFA = Val(TKLFA.Text)
           DR!price = Val(Price.Text)
           DR!total = Val(tot(Qty.Text, TKLFA.Text))
           dt.Rows.Add(DR)
           Dim cmdb As New SqlCommandBuilder(da)
           da.Update(dt)
           MessageBox.Show("تم الحفظ بنجاح", "الاضافة", MessageBoxButtons.OK, MessageBoxIcon.Information)
           fill_DGV()
           cl()
       End If