A voir également:
- Conexion a une base de donnée access
- Base de données access - Conseils pratiques - Visual Basic / VB.NET
- Connexion base de données access c# - Guide
- [asp] [base de données] les bases de données (access et sql) - Conseils pratiques - ASP / ASP.NET
- [vb6] accés à une base de données access en ado - Conseils pratiques - Visual Basic / VB.NET
- Connexion à une base de données access sécurisée - Conseils pratiques - Visual Basic / VB.NET
5 réponses
jpleroisse
- Messages postés
- 1788
- Date d'inscription
- mardi 7 novembre 2000
- Statut
- Membre
- Dernière intervention
- 11 mars 2006
Re,
Mets ceci
Set Db = OpenDatabase(App.Path & "\Voyage.mdb")
de cette façon la BD peut se trouver dans n'importe quel répertoire, le
programme ira la chercher.Pour faire tes essais, place ta BD comme
ci-dessus dans vb98.
jpleroisse
Mets ceci
Set Db = OpenDatabase(App.Path & "\Voyage.mdb")
de cette façon la BD peut se trouver dans n'importe quel répertoire, le
programme ira la chercher.Pour faire tes essais, place ta BD comme
ci-dessus dans vb98.
jpleroisse
cs_Jack
- Messages postés
- 14008
- Date d'inscription
- samedi 29 décembre 2001
- Statut
- Modérateur
- Dernière intervention
- 28 août 2015
Salut
Tes réponses sont dans les sources de ce site.
Cherche parmi les sources de la catégorie Database.
Pour le chemin de la DB, rien de plus simple une fois que tu auras créé ta chaine de connexion.
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)
(je
Tes réponses sont dans les sources de ce site.
Cherche parmi les sources de la catégorie Database.
Pour le chemin de la DB, rien de plus simple une fois que tu auras créé ta chaine de connexion.
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)
(je
jpleroisse
- Messages postés
- 1788
- Date d'inscription
- mardi 7 novembre 2000
- Statut
- Membre
- Dernière intervention
- 11 mars 2006
Bonsoir,
Dans Projet / Références, tu coches Microsoft DAO 3.51 Object Library
Ce code récupère dans un Combobox, le Champ Destination dans la table Liste de la Base de donnée Voyage.mdb
Tu changes d'après tes coordonnées, en Bleu le chemin de ta BD, en Vert ta Table et en Rouge ton Champ.
Private Sub Command1_Click()
Dim Db As Database
Dim Req As Recordset
Set Db = OpenDatabase("C:\Program files\microsoft Visual Studio\vb98\Voyage.mdb")
Set Req = Db.OpenRecordset("SELECT * FROM Liste")
Do Until Req.EOF
Combo1.AddItem Req("Destinations")
Req.MoveNext
Loop
Combo1.Refresh
Set Req = Nothing
Set Db = Nothing
End Sub
jpleroisse
Dans Projet / Références, tu coches Microsoft DAO 3.51 Object Library
Ce code récupère dans un Combobox, le Champ Destination dans la table Liste de la Base de donnée Voyage.mdb
Tu changes d'après tes coordonnées, en Bleu le chemin de ta BD, en Vert ta Table et en Rouge ton Champ.
Private Sub Command1_Click()
Dim Db As Database
Dim Req As Recordset
Set Db = OpenDatabase("C:\Program files\microsoft Visual Studio\vb98\Voyage.mdb")
Set Req = Db.OpenRecordset("SELECT * FROM Liste")
Do Until Req.EOF
Combo1.AddItem Req("Destinations")
Req.MoveNext
Loop
Combo1.Refresh
Set Req = Nothing
Set Db = Nothing
End Sub
jpleroisse
bousfiha
- Messages postés
- 47
- Date d'inscription
- lundi 23 mai 2005
- Statut
- Membre
- Dernière intervention
- 1 novembre 2007
je remercie jpleroisse et jack pour leur réponse, mais j ai encore une petite question pour jpleroisse: est ce qu en mettant ma bd dans C:\Program files\microsoft Visual Studio\vb98\ , je pourrai créer un install permettant à l'utilisateur d installer l'applicatin dans n'importe quel dossier?si oui, svp comment? et merci infiniment
bousfiha
- Messages postés
- 47
- Date d'inscription
- lundi 23 mai 2005
- Statut
- Membre
- Dernière intervention
- 1 novembre 2007
merci jpleroisse j ai essayé et ça à marché.merci infiniment