Pour vous faire moins soucieux, cet info je laissé:
Avec le composant qu'est CommonDialog,
Un instrument précieux qui permet d'afficher
Multiples éléments standards des dialogues.
La fonction désiré, ShowOpen se nommé.
Et PathName et FileName sont les propriétés
Permettant au fichier d'être récupéré.
Private Sub cmdParcourir_Click()
Dim strFichier As String
cdiObjet.ShowOpen
strFichier = cdiObjet.PathName & "\" & cdiObjet.FileName
'Avant d'être employé, une chose à conseiller
'Surtout pas oublier: Important de valider!
'Présence, conformité devraient être assez.
End Sub |