08-10-22, 02:08 AM
(آخر تعديل لهذه المشاركة : 08-10-22, 02:18 AM {2} بواسطة حماده ممدوح البحيرى.)
السلام عليكم
لو سمحت لدى هذا الكود واريد ادخال لداتا جريد فيو اخرى بداخل لووب for next
وبالاخص هذا العمود من الجريدفيو hamada.Rows(i).Cells(4).Value.ToString
اسم الداتا جريد فيو المطلوب ادراجها hamada
لو سمحت لدى هذا الكود واريد ادخال لداتا جريد فيو اخرى بداخل لووب for next
وبالاخص هذا العمود من الجريدفيو hamada.Rows(i).Cells(4).Value.ToString
اسم الداتا جريد فيو المطلوب ادراجها hamada
كود :
Public Sub Insert_stock_materials()
Dim Cmd = New SqlCommand("Update kham_prdmm Set Quantity_imports = @Quantity_imports Where prdm_id = @prdm_id", Con)
For i As Integer = 0 To Dgv_recpie.RowCount - 1
Cmd.Parameters.Clear()
With Cmd.Parameters
.AddWithValue("@prdm_id", Dgv_recpie.Rows(i).Cells(1).Value.ToString)
.AddWithValue("@Quantity_imports", Dgv_recpie.Rows(i).Cells(4).Value.ToString + hamada.Rows(i).Cells(4).Value.ToString)
End With
Con.Open()
Cmd.ExecuteNonQuery()
Con.Close()
Next
MsgBox("تم إضافة السجل بنجاح", MsgBoxStyle.Information, "حفظ")
End Sub
صلوا على سيد الخلق سيدنا محمد