Currentrow syntax issue

[Hansduncan]

I am trying to run an insert for each row on a datagridview that is selected (checkbox on 0 column index). My problem is that the @articleID parameter is not selected from the correct row. I want the to pick up the articleID from the row that is being iterated through. Looks like the currentrow syntax isn't working. Any suggestions? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim myCmd As New SqlCommand("sp_Create_NewPriceListLine", MDIParent1.Conn) myCmd.CommandType = CommandType.StoredProcedure For Each Row As DataGridViewRow In Article_searchDataGridView.Rows Dim include As DataGridViewCheckBoxCell = TryCast(Row.Cells("Select_Article"), DataGridViewCheckBoxCell) If Row.Cells("Select_Article").Value = True Then MDIParent1.Conn.Open() Dim discountID As SqlParameter = myCmd.Parameters.AddWithValue("@discountID", Me.DiscountIdTextBox1.Text) discountID.Direction = ParameterDirection.Input Dim articleID As SqlParameter = myCmd.Parameters.AddWithValue("@articleID", Me.Article_searchDataGridView.Item(7, Me.Article_searchDataGridView.CurrentRow.Index).Value) 'Me.Article_searchDataGridView.CurrentRow.Index).Value) articleID.Direction = ParameterDirection.Input Dim userID As SqlParameter = myCmd.Parameters.AddWithValue("@userID", MDIParent1.userid) userID.Direction = ParameterDirection.Input Dim myReader As SqlDataReader = myCmd.ExecuteReader() myReader.Close() MDIParent1.Conn.Close() End If myCmd.Parameters.Clear() Next End Sub

[Hansduncan]

Never mind....found the answer :) Dim articleID As SqlParameter = myCmd.Parameters.AddWithValue("@articleID", Row.Cells("DataGridViewTextBoxColumn1").Value) 'Me.Article_searchDataGridView.CurrentRow.Index).Value) articleID.Direction = ParameterDirection.Input