Dim Insert As New SqlCommand("Insert into FAGR(FAGRC,FAGRD,FAGRN,FAGRU) Values(@FAGRC,@FAGRD,@FAGRN,@FAGRU)", connection) Insert.Parameters.Add(New SqlParameter("@FAGRC", SqlDbType.NChar, 3)) Insert.Parameters.Add(New SqlParameter("@FAGRD", SqlDbType.NChar, 1)) Insert.Parameters.Add(New SqlParameter("@FAGRN", SqlDbType.NVarChar, 50)) Insert.Parameters.Add(New SqlParameter("@FAGRU", SqlDbType.NChar, 3)) For I As Integer = 0 To DataGridView1.Rows.Count-1 Insert.Parameters(0).Value = DataGridView1.Rows(I).Cells(0).Value Insert.Parameters(1).Value = DataGridView1.Rows(I).Cells(1).Value Insert.Parameters(2).Value = DataGridView1.Rows(I).Cells(2).Value Insert.Parameters(3).Value = DataGridView1.Rows(I).Cells(3).Value Insert.ExecuteNonQuery() Next
null
I
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)