20-04-19, 12:21 AM
بعد عملية البيع اعمل ابديت للكمية بانقاص الكمية بمعدل ما تم بيعه مثلا
ساعطيك كود يقوم بانقاص الكمية بع البيع
ساعطيك كود يقوم بانقاص الكمية بع البيع
كود :
Public Sub LoseQty()
For i As Integer = 0 To dgv_sale_Products.Rows.Count - 1
Dim a As Integer = dgv_sale_Products.Rows(i).Cells(4).Value
Dim cmdUpdate As New SqlCommand
With cmdUpdate
.Connection = Con
.CommandType = CommandType.Text
.CommandText = "update Products set QuantityAvailable= QuantityAvailable - " & a & " Where ProductID = " & dgv_sale_Products.Rows(i).Cells(0).Value & " "
End With
If Con.State = 1 Then Con.Close()
Con.Open()
cmdUpdate.ExecuteNonQuery()
Con.Close()
Next
End Sub
