ComboBox et Fichiers

Question

Salut à tous

je cherche comment on peut récupérer les noms des fichiers contenus dans un répertoire donné puis les afficher dans une ComboBox

merci d'avance de votre aide

cs_fuck · Answer

Bonjours,

Rajoute un controle fileListbox(cacher) et dans le code rajoute :

dim i
for i=0 to file1.listcount-1
combo1.additem file1.list(i)
next i


Combo1 etant ton combot

Voila ;)

Renfield · Answer

Cette solution (encore?) n'est pas très propre, est consomme des ressources......(désolé Fuck)


Private Sub Form_Load()
    Dim NomFichier As String
    NomFichier = Dir$("F:")
    
    Combo1.Clear
    
    While NomFichier <> vbNullString
        Combo1.AddItem NomFichier
        NomFichier = Dir$
    Wend
End Sub


Tu peux facilement mettre ca dans une fonction qui prendrait en parametre le comboBox a utiliser, et le repertoire a lister (voire même le type de doc a afficher....)

By Renfield

[mailto:thomas_reynald@msn.com thomas_reynald@msn.com]

Aucune touche n'a ete blessee lors de la saisie de ce texte.......... ;)

Septentrion777 · Answer

merci merci
c'est exactement ce que je voulais

cs_fuck · Answer

EScuse me REnfield, je n'y avait pas penser et comme j'etait presser j'ai mis ce code ci dessus.
Voila ;)

sebcbien67 · Answer

Bonjour à tous,

Je reprend ce sujet sur l'affichage des fichiers présent dans un répertoire à travers un combobox.
Effectivement cela marche TB mais comment faire pour afficher dans ce même combobox d'autres fichiers présent dans un autre répertoire?

Merci bien

ComboBox et Fichiers

5 réponses

Discussions similaires