[DR.YASER]

(02-07-20, 02:22 PM)ahmedbezia كتب :

السلام عليكم

ارجو الاهتمام با هد السؤال والاجابة 

قاعدة البينات اكسس 

اريد كود التعديل في الدتا قلايد فيو لعدة سجلات في نفس الوقت حسب id لكل سجل اريد هدا لعملية خصم من المخزون مثلا بعت المنتج رقم 1 عدد3 اخصمهم من المخزون حسب id المنتج اللدي اخترته 

كود :

con.Open() 'Open connection to database

'Looping throung dgv
For i As Integer = 0 To dgvEmpDetail.Rows.Count - 1
   If IsDBNull(dgvEmpDetail.Rows(i).Cells("Emp_ID").Value) Then Exit For
   Dim cmd As New SqlCommand("Update EmployeeDetail Set [Salary] = ?, [Experience]=?, [Skills]=? WHERE [Emp_ID] =?", con)

   With cmd.Parameters
      .AddWithValue("@Salary", dgvEmpDetail.Rows(i).Cells("Salary").Value )
      .AddWithValue("@Experience", dgvEmpDetail.Rows(i).Cells("Experience").Value )
      .AddWithValue("@Skills", dgvEmpDetail.Rows(i).Cells("Skills").Value )
      .AddWithValue("@Emp_ID", dgvEmpDetail.Rows(i).Cells("Emp_ID").Value )
   End With
   cmd.ExecuteNonQuery()

Next i

con.Close() 'Close connection with Database