'Déclaration des variables access
Dim DBase As Database
Dim Rst As Recordset
Dim Sqlt As String
Dim Lien As String
Dim LienBase As String
'Ouverture de la base access
Lien = LienBase & "\Nom_de_la_base.mdb" 'LienBase est le chemin d'accés de votrebase
Set DBase = OpenDatabase(Lien) 'Ouverture de la base
'Ouverture de la table access
Sqlt = "select * from Table" 'Table est le nom de la table acces à ouvrir
Set Rst = DBase.OpenRecordset(Sqlt, dbOpenDynaset)
' En supplement si vous souhaitez scanner toute une table de la base
While Not Rst.EOF 'Tant que nous ne pas au dernier enregistrement
Salut,
>[auteur/NARCISSE84/1344944.aspx narcisse84] :Tu pourrais peu être essayer d'explorer la section source avant de poster, C'est pas comme si ce sujet n'était pas déjà présent. [reglement.aspx Voir le règlement de CodeS-SourceS]
> [auteur/JIMYNEUTRON/683439.aspx jimy neutron]: Bravo pour ta patiente. note au passage qu'il serait "mieux" d'utiliser ADO plutot que DAO non?
Et bien sauf si je me trompe , dans ton exemple tu utilises DAO non (Objet DataBase)?
Et bien je pense qu'il vaudrait mieux utiliser ADO (ActiveX Data Object) puisqu'il me semble que DAO est obsolète et à été remplacé par ADO