Discussion :

[jacko842]

Bonjours j aimerais réalisé une petite application ou je me connecte a ma base de donnée access grace a l'oject dao:

Code :

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

1
2
3
4
5
6
7
8
 
    Dim ws As DAO.Workspace
    Dim db As DAO.Database
    Dim rst As DAO.Recordset
 
    Set ws = DBEngine.Workspaces(0)
    Set db = ws.OpenDatabase("chemin\Ecole1.mdb")
    Set rst = db.OpenRecordset("Eleves")

Ensuite je voudrais me deplacé dans les reccords en mettant un controle data sur la form et le relié au datagrid. Comment puis-je faire.

merci d'avance

[jacko842]

Je me demande si je ne devrais pas plustot utilisé un dbgrid mais je ne le trouve pas dans mes composants ???

[Delbeke]

Microsoft data bound grid.
Mets un data control sur ta feuille. Lie le grid avec le data control

Puis dans la code

Code :

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

1
2
3
4
5
6
7
8
    Dim ws As DAO.Workspace
    Dim db As DAO.Database
    Dim rst As DAO.Recordset
 
    Set ws = DBEngine.Workspaces(0)
    Set db = ws.OpenDatabase("chemin\Ecole1.mdb")
    Set rst = db.OpenRecordset("Eleves")
    Set Data1.RecordSet = rst