2013-05-27 5 views
1

Я использую VB.Net, и у меня есть база данных, содержащая две таблицы: «Personne» и «PersonneCopy» (та же схема, что и Personne [4 столбца = N °, FirstName, LastName, B_Day])Копирование полной строки из базы данных таблицы

загружает первую таблицу в DataGridView все это хорошо с этим, вот код:

Dim Connection As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source= .\BD.mdb") 
Dim SqlRequete As String = "Select * From Personne" 
Dim Adapter As New OleDbDataAdapter(SqlRequete, Connection) 
Dim DataSet As New DataSet 
Adapter.Fill(DataSet, "Tb1") 
Dim DataTable As New DataTable 
DataTable = DataSet.Tables("Tb1") 
DataGridView1.DataSource = DataTable 

есть ли способ, чтобы добавить полную строку, которая была выбрана из dataGridView1 к столу «PersonneCopy» ?

И, кстати, я пробовал этот код с другим Datagridview, чтобы получить индекс выбранной строки, и он работает.

Dim Index As Integer = DataGridView1.Item(0, DataGridView1.CurrentRow.Index).Value 
Dim SqlRequete As String = "Select * From Personne where N°=" & Index.ToString 
Dim Adapter As New OleDbDataAdapter(SqlRequete, Connection) 
Dim Ds As New DataSet 
Adapter.Fill(Ds, "Tb") 
DataGridView2.DataSource = Ds.Tables(0) 

ответ

1

Попробуйте, как это

Dim drCopy as DataRow 
Dim tbCopy as Datatable 

tbCopy = .... 'PersonneCopy table 

drCopy=tbCopy.NewRow() 
For i as integer=0 to drCopy.columns.count-1 
    drCopy(i)=Ds.Tables(0).rows(0).items(i) '---------> or you can change rows(0) 
Next 
tbCopy.Rows.Add(drCopy) 
+0

Спасибо за ответ. Но drCopy as Datarow не имеет члена столбцов. И dstRow означает drCopy здесь? –

+0

Ups .. извините! Это должно быть «drCopy» .. и drCopy будет иметь такую ​​же структуру с tbCopy, если вы заполните tbCopy = ......... – matzone

Смежные вопросы