Remplir un datagrid a partir d une requete sql

Résolu
cs_neotof Messages postés 75 Date d'inscription jeudi 12 août 2004 Statut Membre Dernière intervention 3 décembre 2012 - 25 janv. 2008 à 14:00
cs_neotof Messages postés 75 Date d'inscription jeudi 12 août 2004 Statut Membre Dernière intervention 3 décembre 2012 - 25 janv. 2008 à 14:02
Bonjour je veux remplir un dbgrid a partir d une requette sql dans une base de donnée access 97 en dao:

PublicSub PROCEDURE_DATE_ABSENCE()
 
Dim ws As Workspace
Dim db As Database
Dim rst As Recordset

Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase(App.Path & "/GestionElevesAbsences97.mdb", dbLangGeneral, dbVersion30)
Set rst = db.OpenRecordset("SELECT Absence_tbl.Date_debut_absence, Absence_tbl.Date_fin_absence, Eleves_tbl.Id_eleve FROM Eleves_tbl INNER JOIN Absence_tbl ON Eleves_tbl.Id_eleve=Absence_tbl.Eleve Where (((Eleves_tbl.Id_eleve) = 6))")
dbg_absence.DataSource = rst
EndSub

il me met un message d erreur: Il me met erreur de conversion de type de donnée qui pointe sur la ligne:

si je met juste Set db = ws.OpenDatabase(App.Path & "/GestionElevesAbsences97.mdb")


il me met la classe ne gère pas soit l automation ou l interface attendue sur la ligne dbg_absence.dataSource=rst

Que faire besoin d aide

1 réponse

cs_neotof Messages postés 75 Date d'inscription jeudi 12 août 2004 Statut Membre Dernière intervention 3 décembre 2012
25 janv. 2008 à 14:02
oups petite erreur lol de manipulation dsl
3
Rejoignez-nous