Recuperer un chemin d'acces

Question

Bonjour,

J'aimerai pouvoir récuperer le chemin d'acces d'un dossier.

Genre ça ouvre une boite de dialogue, je selectionne un dossier et il me récupère le chemin dans une variable

Exemple :

Dim Path = "C:\Projets\Test"

Je sais que je peux ouvrir une boite de dialogue avec

 Dim Ouvrir As New OpenFileDialog()

Mais après je sais pas trop comment récuperer le chemin :x

Answer 1

Bonjour, 

Vous pouvez suivre les informations présentent sur MSDN : 

http://msdn.microsoft.com/fr-fr/library/system.windows.forms.openfiledialog(v=vs.110).aspx

Cordialement, 

---

Kevin BEAUGRAND, Modis FRANCE
Merci de bien vouloir "Marquer comme réponse", les réponses qui ont résolu votre problème.

Answer 2

J'avais déjà vu, cela ne m'aide pas.

Il ouvre tout les dossiers je n'arrive pas faire en sorte qu'il prenne un dossier et qu'il me donne son chemin d'acces...

Answer 3

Pardon, 

Utilisez plutôt le FolderBrowserDialog.

Une fois lancée et le dossier sélectionné vous pourrez récupérer le chemin via la propriété SelectedPath.

Cordialement, 

---

Kevin BEAUGRAND, Modis FRANCE
Merci de bien vouloir "Marquer comme réponse", les réponses qui ont résolu votre problème.

Answer 4

J'utilise la fonction "CurDir(), c'est pas une bonne solution ?

Answer 5

CurDir, vous donnera le chemin d'accès en cours.

Il ne vous permettra pas de proposer à l'utilisateur de sélectionner un répertoire.

pour proposer à l'utilisateur de sélectionner un répertoire il faut utiliser le FolderBrowserDialog.

Plus d'infos sur : http://msdn.microsoft.com/fr-fr/library/0hye9yys(v=vs.90).aspx

Cordialement, 

---

Kevin BEAUGRAND, Modis FRANCE
Merci de bien vouloir "Marquer comme réponse", les réponses qui ont résolu votre problème.

Answer 6

Vous n'auriez pas un petit exemple d'application ? Celui du Msdn ne me va pas :x

Answer 7

En fait non, j'ai rien dis, ça marche très bien ^^

Merci :)

Answer 8

Bonjour, 

Voici un petit exemple : 

Dim folderBrowserDialog1 As FolderBrowserDialog = New System.Windows.Forms.FolderBrowserDialog()

folderBrowserDialog1.ShowNewFolderButton = False

' Show the FolderBrowserDialog.
Dim result As DialogResult = folderBrowserDialog1.ShowDialog() 

If ( result = DialogResult.OK ) Then
folderName = folderBrowserDialog1.SelectedPath 
End If

Cordialement, 

---

Kevin BEAUGRAND, Modis FRANCE
Merci de bien vouloir "Marquer comme réponse", les réponses qui ont résolu votre problème.