Hello
Qui aurait la patience de répondre à cette requête. J'ai une BBD access 2003 avec quelques champs... Je dois la mettre dans un programme VB6 afin de pouvoir ajouter des données et faire une requête sur un champ donné...
Le problème est que j'arrive désespérement pas à "voir" cette bdd sous vb6 !  
Est-ce que quelqu'un aurait un tutoriel pas à pas... J'ai le bouquin de chez 01informatique mais il n'est décidemment pas clair...
 
Merci d'avance!

Voici une partie du code
 
Private Sub Command1_Click()
Dim cnx As ADODB.Connection
Dim cmd As ADODB.Command
Dim prm1 As ADODB.Parameter
Dim rst As ADODB.Recordset
Set cnx = New ADODB.Connection
Set cmd = New ADODB.Command
Set prm1 = New ADODB.Parameter
Set rst = New ADODB.Recordset
 
cnx.Provider = "Microsoft.Jet.Oledb.3.51"
cnx.ConnectionString = "C:\bd1.mdb"
cnx.Open
 
cmd.CommandText = "SELECT * FROM fproche WHERE theme = ?"
 
prm1.Name = "nom"  
prm.Type = adVarChar  
prm.Direction = adInput  
prm.Size = 40  
prm.Value = " "  
 
 
Set rst = cmd.Execute
 
'Driver={Microsoft Access Driver (*.mdb)};Dbq=chemin\nombd.mdb;Uid=NomUtilisateur;Pwd=MotDePasse;
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=chemin\nombd.mdb;User Id=NomUtilisateur;Password=MotDePasse;
 
End Sub