Discussion :

[stargates]

Bonjour,

Je voudras afficher toutes mes tables liées, j'utilise un datagridview

j'ai une table administrateur, programme,forum,gsm

les tables programme,forum et gsm sont reliées à la table administrateur
par ID_Admin


Comment pouvoir les afficher toutes ensembles


Voici mon code de départ

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
 
Public Class Form1
    Dim Connexion As String
    Dim ConnexionOLE As OleDbConnection
    Dim da As OleDbDataAdapter
    Dim ds As DataSet
    Dim dv As DataView
    Dim cb As OleDbCommandBuilder
Public Sub AfficheTous()
 
        Connexion = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\\MonBoulot\MesDonnees\MesDonnées.mdb"
        ConnexionOLE = New OleDbConnection
        ConnexionOLE.ConnectionString = Connexion
        ConnexionOLE.Open()
        da = New OleDbDataAdapter("Select * from Administrateur ", ConnexionOLE)
        ds = New DataSet()
        da.Fill(ds, "mytable")
        dv = ds.Tables("mytable").DefaultView
        ConnexionOLE.Close()
        dtgvDonnee.DataSource = dv
        dv.AllowEdit = True
 
 
 
    End Sub
 
 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        AfficheTous()
 
    End Sub
End Class

ne faut-il pas aussi changer les données du dataview et du OleDbDataAdapter?



Merci

[bidou]

il faut ajouter des colonnes et mettre le lien de navigation dans la propriété expression