Discussion :

[morgan47]

Bonjour tout le monde.
j'ai créé un petit code afin de récupérer un fichier. avec les common dialogs.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Command1_Click()
'On Error GoTo Sortiediscrete
CommonDialog1.FileName = ""
CommonDialog1.ShowOpen
 
Cheminfichier = CommonDialog1.FileName
nomfichier = CommonDialog1.FileTitle
 
If Cheminfichier = "" Then MsgBox "vous n'avez rien sélectionné": Text1.Text = Cheminfichier: Exit Sub
 
MsgBox Cheminfichier
Text1.Text = Cheminfichier
End Sub

Mais le probleme c'est que je souhaiterais selectionner les dossiers, comment puis-je faire ca je n'en ai aucune idée.
quelqu'un pourrai m'aider?

[ThierryAIM]

http://vb.developpez.com/faq/?page=Fichiers#select_rep

[morgan47]

oups..
merci