SQL Server database not getting updated - sql-server

Question

I am using the following code, but database is not getting updated:
Dim update As New SqlCommand("Update FAGR SET FAGRN=#FAGRN,FAGRU=#FAGRU WHERE FAGRC=#FAGRC", connection)
update.Parameters.Add(New SqlParameter("#FAGRC", SqlDbType.NChar, 3))
update.Parameters.Add(New SqlParameter("#FAGRN", SqlDbType.NVarChar, 50))
update.Parameters.Add(New SqlParameter("#FAGRU", SqlDbType.NChar, 3))
Dim i As Integer
i = 0
Do While i < DataGridView1.Rows.Count
Try
update.Parameters(0).Value = DataGridView1.Rows(i).Cells(0).ToString
update.Parameters(1).Value = DataGridView1.Rows(i).Cells(1).ToString
update.Parameters(2).Value = DataGridView1.Rows(i).Cells(2).ToString
vartemp1 = update.ExecuteNonQuery()
i=i+1
Catch ex As Exception
MsgBox("Exception:" & vbCrLf & ex.Message)
Finally
Me.Close()
End Try
Loop
'IN A SIMILAR INSERT QUERY THE FIRST ROW OF GRID IS INSERTED IN DATABASE. THE OTHER RECORDS ARE NOT INSERTED BUT ALSO NO ERROR IS SHOWN.

Answer 1

First, make sure you're referring to the right columns:
Dim fagrc As DataGridViewColumn = DataGridView1.Columns("FAGRC")
Dim fagrn As DataGridViewColumn = DataGridView1.Columns("FAGRN")
Dim fagru As DataGridViewColumn = DataGridView1.Columns("FAGRU")
DataGridViewCell.ToString do not return the cell value. From reflector:
Public MustInherit Class DataGridViewCell
Public Overrides Function ToString() As String
Return String.Concat(New String() {"DataGridViewCell { ColumnIndex=", Me.ColumnIndex.ToString(CultureInfo.CurrentCulture), ", RowIndex=", Me.RowIndex.ToString(CultureInfo.CurrentCulture), " }"})
End Function
End Class
Do it like this:
Dim id As String = Nothing
For Each row As DataGridViewRow In DataGridView1.Rows
If (Not row.IsNewRow) Then
id = row.Cells(fagrc.Index).Value.ToString()
If (String.IsNullOrEmpty(id)) Then
Throw New ApplicationException("FAGRC missing.")
Else
update.Parameters(0).Value = id
update.Parameters(1).Value = row.Cells(fagrn.Index).Value.ToString()
update.Parameters(2).Value = row.Cells(fagru.Index).Value.ToString()
If (update.ExecuteNonQuery() <= 0) Then
Throw New ApplicationException("Could not update FAGRC with value '" & id & "'.")
End If
End If
End If
Next

Answer 2

Try to use the ForEach
'IN A SIMILAR INSERT QUERY THE FIRST ROW OF GRID IS INSERTED IN
DATABASE. THE OTHER RECORDS ARE NOT INSERTED BUT ALSO NO ERROR IS
SHOWN.
For Each dataGridViewRow As DataGridViewRow In DataGridView1.Rows
If dataGridViewRow.Index = 0 Then 'hint: this is your temporary textbox
Update.Parameters(0).Value = dataGridViewRow.Cells(0).ToString()
'Others Stuff
'vartemp1 = Update.ExecuteNonQuery()
Exit For
End If
Next
Hope it will helps.