afficher dans une liste, le contenu d'un dossier Windows

[Guigui]

Hello le forum

Je souhaite que s'affiche dans un combobox, le contenu d'un Dossier windows.

Je sais pas si cela est possible, alors si quelqu'un peux m'aider...

Merci d'avance .

Guillaume&Co

 

[sousou]

Bonjour, Guigui


Un exemple qui fait strictement ce que tu demandes, mais bien d'autre solution sont possible en utilisant les boites de dialogues intégrés.
Tout dépend de ce que tu veux faire.
A suivre

Private Sub ComboBox1_GotFocus()
ComboBox1.Clear
fic = Dir("c:\windows\*.exe")
While Dir <> ""
ComboBox1.AddItem fic
fic = Dir()
Wend
End Sub

 

[elhich]

salut forum
essayer de ne pas tester sur Dir car il sera une double incrementation, et ça risque de ne pas afficher tous les fichiers executables.
c'est à dire :

Private Sub ComboBox1_GotFocus()
ComboBox1.Clear
fic = Dir("c:\windows\*.exe")
While fic <> ""
ComboBox1.AddItem fic
fic = Dir()
Wend
End Sub
a+