GoldenMilleniumBoulet
Messages postés5Date d'inscriptionmardi 23 juillet 2002StatutMembreDernière intervention24 juillet 2002
-
23 juil. 2002 à 11:47
GoldenMilleniumBoulet
Messages postés5Date d'inscriptionmardi 23 juillet 2002StatutMembreDernière intervention24 juillet 2002
-
23 juil. 2002 à 14:31
:big) Bonjour ! :big)
Langage : VB6
J'aimerai recuperer tout les noms de fichiers se trouvant dans un repertoire et les placer ensuite dans une ListBox.
J'ai deja reussi a le faire a l'aide d'une boite de dialogue "Ouvrir" mais on ne peut en récuperer qu'un !!!
Private Sub but_theme_ajouter_pages_Click()
On Error Resume Next
BoiteDialogueOuvrir.FileName = ""
BoiteDialogueOuvrir.ShowOpen
If Not Err Then
ListAffichageAdresseTheme.AddItem (BoiteDialogueOuvrir.FileName)
End If
End Sub