Я пытаюсь добавить все строки в datagridview в базе данных sql, в которой указан c текст «оранжевый», но когда я добавляю, выдает ошибку, что supid не предоставлен. Может кто-то направить меня. моя таблица данных выглядит как
введите код здесь
Private Sub orange ()
Using cn As New SqlConnection("server= .\SQLEXPRESS; database = software; integrated security=true")
Using cmd5 As New SqlCommand("INSERT INTO orangedata (supid,date,docno,name,qty,value) VALUES (@supid,@date,@docno,@name,@qty,@value)", cn)
cmd5.Parameters.Add("@supid", SqlDbType.NChar)
cmd5.Parameters.Add("@date", SqlDbType.VarChar)
cmd5.Parameters.Add("@docno", SqlDbType.VarChar)
cmd5.Parameters.Add("@name", SqlDbType.VarChar)
cmd5.Parameters.Add("@qty", SqlDbType.VarChar)
cmd5.Parameters.Add("@value", SqlDbType.VarChar)
For Each rw As DataGridViewRow In DataGridView2.Rows
With cmd5
If rw.Cells(0).Value = "Orange" Then
.Parameters("@supid").Value = combobox6.text
.Parameters("@date").Value = Now.ToString
.Parameters("@docno").Value = Val(Label5.Text)
.Parameters("@name").Value = rw.Cells(7).Value
.Parameters("@qty").Value = rw.Cells(8).Value
.Parameters("@value").Value = rw.Cells(1).Value
End If
End With
cn.Open()
cmd5.ExecuteNonQuery()
cn.Close()
Next
End Using
End Using
End Sub