Inserting data through Data gridview

[Dili1234]

Is there possiblity to send, 5 data(5rows) at one time to the sql database in vb.net2008

[pritaeas]

Yes. Just adjust your insert query.

... VALUES (1, 'a'), (2, 'b'), (3, 'c')

[Dili1234]

Let me know whereto adjust.................

 Dim comd As SqlCommand = myConnection.CreateCommand()
        Try
            myConnection = New SqlConnection(connectionstring)
            myConnection.Open()
            comd.Connection = myConnection
            comd.CommandText = "Insert into NEW1([Fruits] ,[Countries]) values( @Fruits   ,@Countries)"

            'Adding Parameters
            comd.Parameters.Add("@Fruits", SqlDbType.VarChar, 250)
            comd.Parameters.Add("@Countries", SqlDbType.NVarChar, 250)
            'comd.Parameters.Add("@Qty", SqlDbType.VarChar, 50)
            'comd.Parameters.Add("@Rte", SqlDbType.VarChar, 50)
            'comd.Parameters.Add("@TotalAmt", SqlDbType.VarChar, 50)

            comd.Prepare()
            'Data Inserted

            For Each row As DataGridViewRow In DataGridView1.Rows
                If Not row.IsNewRow Then
                    comd.Parameters("@Fruits").Value = row.Cells(0).Value.ToString
                    comd.Parameters("@Countries").Value = row.Cells(1).Value.ToString
                    '    comd.Parameters("@Qty").Value = row.Cells(2).ToString
                    '    comd.Parameters("@Rte").Value = row.Cells(3).ToString
                    '    comd.Parameters("@TotalAmt").Value = row.Cells(4).ToString
                End If
            Next
            comd.ExecuteNonQuery()
            MessageBox.Show("Data Inserted")

        Catch ex As Exception
            MessageBox.Show("Error :" & ex.ToString())
        Finally
            myConnection.Close()
        End Try
        'Else
        'MessageBox.Show("Enter PoNumber")
        'End If