[خالد كامل1]

احبتى اسعدكم الله بكل ما هو خير فى الدنيا والاخره
تظهر لى رساله عند حذف الاصناف فى الفاتوره  التى تظهر امامكم فى الصوره  والتى مفادها
(خطأ في بناء الجملة (عامل التشغيل مفقود) في تعبير استعلام 'procode ='.)
وللعلم يا اخوانى قد تحققت من الكود وتحققت ن حقول الجدول لم اجد فيها خطأ وهذا الكود الذى استعمله

كود :

Sub addqty()

       For i As Integer = 0 To DGVPRODUCT.Rows.Count - 1
           Dim g As String = Me.DGVPRODUCT.CurrentRow.Cells(2).Value
           Dim cmdzqty As New OleDbCommand
           With cmdzqty
               .Connection = con
               .CommandType = CommandType.Text
               .CommandText = " Update products set pro_qty = pro_qty + " & g & "  where  procode =" & DGVPRODUCT.CurrentRow.Cells(0).Value
               .Parameters.Add(New OleDb.OleDbParameter("@procode", OleDb.OleDbType.VarChar)).Value = DGVPRODUCT.CurrentRow.Cells(0).Value
           End With
           If con.State = 1 Then con.Close()
           con.Open()
           cmdzqty.ExecuteNonQuery()
           con.Close()
       Next

   End Sub