Chemin d'accés

Résolu
Signaler
Messages postés
95
Date d'inscription
jeudi 7 mai 2009
Statut
Membre
Dernière intervention
3 juillet 2009
-
Messages postés
95
Date d'inscription
jeudi 7 mai 2009
Statut
Membre
Dernière intervention
3 juillet 2009
-
Bonjour,
je souheterais savoir coment faire pour avoir un controle qui me permette de choisir un fichier sur mon ordinateur et ensuite d'afficher dans un textbox son chemin.
Merci

6 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,
Il te faut ajouter Microsoft Common Dialog Control 6.0 (SP6) depuis le menu Composant (Ctrl + T)

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Re,
Ce qui n'est donc pas du tout la meme question.

regarde ceci

Option Explicit

Private Sub Dir1_Change()
   File1.Path = Dir1.Path
End Sub<hr />
Private Sub Drive1_Change()
   Dir1.Path = Drive1.Drive
End Sub<hr />
Private Sub File1_Click()
   Text1.Text = File1.Path & "\" & File1.FileName
End Sub<hr />, ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
95
Date d'inscription
jeudi 7 mai 2009
Statut
Membre
Dernière intervention
3 juillet 2009

En gros je souheterais en utilisant un drivListBox , un dirListBox et un fileListBox pouvoir afficher dans une textbox le chemin complet.
Messages postés
95
Date d'inscription
jeudi 7 mai 2009
Statut
Membre
Dernière intervention
3 juillet 2009

En faite c'est bon en cherchant un peu http://gilmir.developpez.com/tutoriels-vb6/tutoriel9/

et pour le chemin :
Private Sub File1_Click()


Dim SelectedFile As String
SelectedFile = File1.Path &amp; "" &amp; File1.FileName '
Image1.Picture = LoadPicture(SelectedFile)


chemin.Text = Dir1.Path &amp; File1.Path &amp; File1.FileName


End Sub
Messages postés
95
Date d'inscription
jeudi 7 mai 2009
Statut
Membre
Dernière intervention
3 juillet 2009

Désoler je l'écrivait en même temps merci quand même.
Messages postés
95
Date d'inscription
jeudi 7 mai 2009
Statut
Membre
Dernière intervention
3 juillet 2009

en faite pr l'affichage dans la textbox je me suis planté faut prendre ta solution