31-08-19, 08:47 PM
احبتى بارك الله لكم فى كل ما تتمنوا وتحبوا
فى فاتوره المشتريات وعند حفظ الفاتوره يجب ان تضاف الكميه المشتراه من الصمف الى المخزن
الكود يعمل تمام وصح ولكن ان اشتريت اكثر من صنف فى الفاتوره لا يضيف الا الصنف الاةل فى الفاتوره وباقى الصناف لا تضاف كميتها
وهذا هو الكود الذى استعمله
فاين الخطأ فى الكود
فى فاتوره المشتريات وعند حفظ الفاتوره يجب ان تضاف الكميه المشتراه من الصمف الى المخزن
الكود يعمل تمام وصح ولكن ان اشتريت اكثر من صنف فى الفاتوره لا يضيف الا الصنف الاةل فى الفاتوره وباقى الصناف لا تضاف كميتها
وهذا هو الكود الذى استعمله
كود :
Sub ADDkama()
Dim R As Integer = Val(dgvBUYKAMA.CurrentRow.Cells(2).Value)
Dim cmdmaden As New OleDbCommand
With cmdmaden
.Connection = con
.CommandType = CommandType.Text
.CommandText = " Update KHAMAT set khamarasedopen= khamarasedopen +" & R & " where khamacode ='" & dgvBUYKAMA.CurrentRow.Cells(0).Value & "'"
End With
If con.State = 1 Then con.Close()
con.Open()
cmdmaden.ExecuteNonQuery()
con.Close()