Prob avec DirlistBox

Question

Hello,



j'ai une Drivelistbox et une Dirlistbox... le prob c'est qu'au
chargement (Form_Load) de mon programme, j'aimerais r&#233;cup&#233;rer le path
afin de pointer directement sur un r&#233;p&#233;rtoire pr&#233;cis sauvegard&#233; dans un
fichier texte...jusque la pas de probl&#232;me... j'arrive a changer le
disque courant du drivelistbox en faisant :

Drivbox.Drive = RepSave    ou RepSave contient par exemple e:	oto	iti

 

par contre apr&#232;s je fais 



 List_dir.Path = Drivbox.Drive



et la ca ne change rien... alors que si j'ai bien compris cela devrait fonctionner...



                                                                          
Je me suis casss&#233; la t&#234;te la dessus tout l'apr&#232;s-midi... mais rien a
faire 



               
              
              
              
               Merci
de vos r&#233;ponses

cs_Tipo · Answer

Salut,

Je crois que ton probl&#232;me vient du fait que tu ne peux pas affecter un chemin au drivebox.drive
Essaie de faire Drivbox.Drive = Left(RepSave,2) pour juste r&#233;cup&#233;rer le lecteur

puis sur le Drive1_Change, tu mets

List_dir.Path =RepSave (si repsave est public)

cs_hassen · Answer

repertoire="d:\hassen	unisie"

Drive1 = Left(repertoire, 2)

list_Dir.path=repertoire

Hassen TUNISIE

firens · Answer

Ben j'avais d&#233;j&#224; test&#233; ces possibilit&#233;s mais ca ne changeait rien au probl&#232;me.



Voici mon code :



Private Sub Drivbox_Change()

  On Error GoTo DriveHandler

    List_dir.Path = Drivbox.Drive

    RepertoireAPI = List_dir.Path

    Exit Sub

DriveHandler:

    Drivbox.Drive = List_dir.Path

    Exit Sub

End Sub



Private Sub List_dir_LostFocus()

List_dir.Path = List_dir.List(List_dir.ListIndex)

End Sub





et dans le form_Load



RepSave = ReadWrite_Adresse(False)

If RepSave <> "" Then

 Drivbox.Drive = Left(RepSave, 2)

    List_dir.Path = RepSave

End If

Prob avec DirlistBox

3 réponses

Discussions similaires