Discussion :

[samba2005kanoute]

Bonjour,

Je suis un débutant en programmation sous VB6 .j'ai crée une base de donnée sous access 2007 je ne sais pas commet faire pour connecte avec VB6. Je n'arrive pas à faire fonctionner ma base alors je viens vers vous pour que vous punissez m'aider.
Merci.

[zazaraignée]

On ne peux pas faire grand chose si tu ne nous montre pas le code de ta connexion, ni si tu ne nous dis pas quelle méthode de connexion à ta base de données tu utilises.

Tu as regardé les tutoriels ?

[davland7]

Je ne sais pas si ça va t’aider, mais voici comment je me connecte à Access 2007


Dans le menu Project > References

Coche Microsoft Active X Data Objects 2.0 Library


Ce code affiche des données dans une liste

Dans Sub Form_Load()

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
Dim cn As ADODB.Connection
Set cn = New Connection
 
'Pour une BD en format 2003 .mbd
'cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\donnees.mdb"
 
'Pour une BD en format 2007 .accbd
cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\donnees.accdb"
cn.Open
 
Dim rs As ADODB.Recordset
 
Set rs = New Recordset
rs.Open "SELECT prenom,nom FROM personnes", cn, adOpenDynamic, adLockOptimistic
 
While rs.EOF = False
List1.AddItem rs!prenom + " " + rs!nom
rs.MoveNext
Wend
 
rs.Close
cn.Close
 
Set rs = Nothing
Set cn = Nothing