[elgokr]

جرب استخدام الكود بهذا الشكل

كود :

       For ii As Integer = 0 To DataGridView2.RowCount - 1
           Dim Str As String = "insert into tsjel_subj(id_tsjel_subj,id_number,FirstName,name_dorh,number_dorh,subj) values (@1,@2,@3,@4,@5,@6)"
           Dim cmds As New SqlCommand
           If Not connn.State = ConnectionState.Open Then connn.Open()
           cmds.Connection = connn
           cmds.CommandText = Str
           cmds.Connection = connn
           cmds.Parameters.AddWithValue("@1", DataGridView2.Rows(ii).Cells(0).Value.ToString())
           cmds.Parameters.AddWithValue("@2", DataGridView2.Rows(ii).Cells(1).Value.ToString())
           cmds.Parameters.AddWithValue("@3", DataGridView2.Rows(ii).Cells(2).Value.ToString())
           cmds.Parameters.AddWithValue("@4", DataGridView2.Rows(ii).Cells(3).Value.ToString())
           cmds.Parameters.AddWithValue("@5", DataGridView2.Rows(ii).Cells(4).Value.ToString())
           cmds.Parameters.AddWithValue("@6", DataGridView2.Rows(ii).Cells(5).Value.ToString())
           cmds.ExecuteNonQuery()
           cmds.Dispose()
           connn.Close()
           asd()
           asd3()
       Next

تحياتى لك

وتمنياتى لك التوفيق