Discussion :

[sBoOb14]

Bonjour à tous,

Je développe actuellement une application utilisant une base de donnée access et j'ai un petit problème pour remplir un control datagrid.

Je me connecte à la base de la façon suivante :

Code :

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

1
2
3
Public db As ADODB.Connection
db.Provider = "Microsoft.Jet.OLEDB.4.0;Data Source=" & db_path & ";Jet OLEDB:Database Password=" & db_pass & ";"
db.Open

J'essaye de remplir le datagrid de la façon suivante :

Code :

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

1
2
3
4
5
6
7
8
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset
 
rst.Open "SELECT * from parc ", db, adOpenKeyset, adLockBatchOptimistic
 
Set datagrid.DataSource = rst
 
datagrid.Refresh

Le problème que je rencontre est que le datagrid ne se rempli pas du tout, après plusieurs recherche et comparaison de mon code avec d'autres,
le datagrid se rempli correctement si je me connecte à la base de donnée comme ceci :

Code :

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

1
2
    cnStr = "driver={Microsoft Access Driver (*.mdb)};dbq=" & db_path
    Db.Open cnStr

Est-ce normal que le datagrid ne se remplisse pas avec ma méthode de connexion ?

Ne maîtrisant pas vraiment les différentes méthodes de connexion ADO, que me conseiller vous pour une connexion à une base access ?

Je vous remercie par avance de l'aide que vous pourrez m'apporter.

Cordialement.

[sBoOb14]

Bon, après une journée de recherche j'ai réussi à trouver la solution. Je vous en fait profiter, on ne sait jamais.

Code :

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

1
2
3
4
5
 
'On donne maintenant la connexion au recordset pour accéder à properties
rst.ActiveConnection = db
rst.Properties("IRowsetIdentity") = True
rst.Open "SELECT * from parc", , adOpenKeyset, adLockBatchOptimistic

Aprés avoir trouvé des informations chez m$, j'ai aussi trouvé cette discussion

Pour résumer, le problème viens du faite que Microsoft.Jet.OLEDB.4.0 ne gère pas la propriété DBPROP_LITERALIDENTITY.

@ Bientôt

[adil_suptem]

je te conseil d'utiliser data envirenment
ca donner des résultats avancées et c'est facile à utiliser
tu peux meme mettre en place en VB6 une classe pour la gestion de la logique metier (Business Classe).

[sBoOb14]

Peux-tu m'en dire un peu plus sur data environment ?

Est-ce vraiment utile dans mon cas à savoir que j'utilise seulement de simple requete SQL avec trés peu de controle lié ?

Le fait de gérer la connexion avec data environment me simplifiera vraiment la vie ?

Je te remercie.