Browser de ficher

duodiscus
Messages postés
38
Date d'inscription
vendredi 5 novembre 2004
Statut
Membre
Dernière intervention
7 juin 2006
- 26 avril 2005 à 11:37
cs_Xavier
Messages postés
12
Date d'inscription
mercredi 10 mai 2000
Statut
Membre
Dernière intervention
29 avril 2005
- 29 avril 2005 à 15:56
bonjour,
alors voilà,
j'ai un formulaire pour lier mes tables d'une base à une autre base
donc à l'heure actuelle, je récupere le chemin de la base dans un champs indépendant :

Dim CheminLiaison As String
CheminLiaison = [SaisieChemin]
DoCmd.TransferDatabase acLink, "Microsoft Access", CheminLiaison, acTable, "NomTable", "NomTable"

mon champs indépendant s'apelle donc SaisieChemin

le soucis, c'est que là, il faut que l'utilisateur saisissent à la main dans le champs quelque chose du type: c:\test\test.mdb

mais s'il se trompe ça va pas aller ...
donc j'aimerais qu'en cliquant sur un bouton, il ouvre un browser, et qu'il aille pécher le fichier .mdb dans l'ordinateur

voilà
je vous remercie

3 réponses

Starec
Messages postés
152
Date d'inscription
mercredi 30 mars 2005
Statut
Membre
Dernière intervention
5 mars 2007

26 avril 2005 à 12:41
Utilise le contrôle CommonDialog, avec celui-ci "showopen", tu peux naviguer dans ton disque dur pour sélectionner le bon fichier, et ensuite récupérer l'info pour la mettre dans une variable. Cherche boite de dialogue sur le site, tu trouveras plein d'exemples.

Starec
0
econs
Messages postés
4030
Date d'inscription
mardi 13 mai 2003
Statut
Modérateur
Dernière intervention
23 décembre 2008
23
26 avril 2005 à 12:43
utilise un objet CommonDialog (Menu Outils\Controles supplémentaires).

Nommes-le 'cd'



cd.Filter = "(*.mdb)|*.mdb"

cd.ShowOpen

MsgBox cd.Filename




Manu
-------------------------------------------
Une question bien posée, c'est une chance de réponse bien adaptée.
0
cs_Xavier
Messages postés
12
Date d'inscription
mercredi 10 mai 2000
Statut
Membre
Dernière intervention
29 avril 2005

29 avril 2005 à 15:56
Bonjour,

vous pouvez également tester ceci :
http://www.vbfrance.com/code.aspx?id=236
0