Comment connecter vb6.0 avec access

Bonjour,

Quel ACCESS: 2000-2003, 2007,2010??

Salut,

Tu te connecte à Access en VB6 avec ADO ou DAO, c'est largement expliqué par exemple dans ces tutoriels VB6/SGBD.

c'est Access 2007/2010

Bonjour,

Un exmple de connection a une base ACCESS 2007

Option Explicit
Dim Mabase As New ADODB.Connection     'Déclaration d'une connexion à la base de données
Dim TImprim_RST As New ADODB.Recordset 'Déclaration des jeux d'enregistrements
Dim TBon_RST As New ADODB.Recordset    'Déclaration des jeux d'enregistrements

Private Sub Cmd_Connect_2007_Bis_Click()
  Set Mabase = New ADODB.Connection
  'Définition du provider
  'access 97 a 2003 "Microsoft.jet.OLEDB.4.0"
  'access 2007 "Microsoft.ACE.OLEDB.12.0"
  'access 2010 "Microsoft.ACE.OLEDB.14.0"
  Mabase.Provider = "Microsoft.ACE.OLEDB.12.0"
  'Ouverture de la base de données
  Mabase.Open "data source =D:\Test_Open_Base\Test_VB6_2007\Datas_Base\Equipement_Bons_Travaux.accdb"
  'Ouverture des jeux d'enregistrements BdD_Bon: table tous BONS
  TBon_RST.Open "BdD_Bon", Mabase, adOpenStatic       'Ouverture en statique
  'Ouverture en dynamique avec verouillage optimiste
  'TBon_RST.Open "BdD_Bon", Mabase, adOpenStatic, adLockOptimistic


  'Fermeture des jeux d'enregistrements
  TBon_RST.Close
  
End Sub

Private Sub Cmd_Quitter_Click()
  'Fermeture de la base de données
  Mabase.Close
End Sub

Bon courage

Bonjour,
je viens de voir ta question et je tiens à vous repondre meme si vous avez deja eu la reponse des autres.
La premiere chose à faire est d'enregistrer ta base de donnée en Access 2003 meme si vous l'avez crée dans Access 2007 ou 2010. Avant d'enregistrer, aller sur le bouton Office/enregistrer sous, il y a plusieur choix des version de microsoft office access; pour vous vous devez choisir la version 2003 parce qu'elle est la seule compatible avec VB6.0, après vous etes obligié d'aller sur l'un des formulaire crée en VB6.0.
si vous avez utilisé ADODC pour la connexion des vos formulaires à la BD, c'est simple, il faut toutsimplement l'ajouté parmi les objets le glisser sur la feuille puis clic droit sur ADODC/propriétés/jusqu'à la liste des SGBD et là vous allez choisir Le deuxième Microsoft jet 4.0 ça sera fini.

Cordialement!!!!!!!!!!!!!