1 2 3 4 5 6 7 8 9 10 11 12 13
| 'SELECT ChampX,ChampY,ReferenceCleArtiste FROM Morceaux
'SELECT CleArtiste,ChampX,ChampY FROM Artistes
Dim DtArtistes AS New DataTable("Artistes")
Dim DtMorceaux AS New DataTable("Morceaux")
'Remplir les DataTables avec les données...
'T'auras besoin d'un DataSet pour pouvoir créer des relations entre les DataTables
Dim Ds AS New DataSet()
Ds.Tables.Add(DtArtistes)
Ds.Tables.Add(DtMorceaux)
'Tu crées la relation
Ds.Relations.Add("FK_Morceaux_Artistes", DtArtistes.Columns("CleArtiste"), DtMorceaux.Columns("RefCleArtiste"))
'Tu n'as plus qu'à passer le DataTable DtArtistes au DataSource d'une DataGrid
MaDataGrid.DataSource=DtArtistes |
Partager