Lister les noms de fichiers d'un répertoire donné

Signaler
Messages postés
6
Date d'inscription
lundi 5 février 2018
Statut
Membre
Dernière intervention
28 février 2018
-
Messages postés
7378
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 mai 2021
-
Bonjour.
Je cherche à lister (par exemple dans une listbox), le nom de tous les fichiers .JPG d'un répertoire donné qui contiendrait également d'autres types de fichiers, et ce de manière automatique et transparente pour l'utilisateur.
Par exemple :
image A.jpg
image C.jpg
image F.jpg
Je sèche sur le sujet depuis... trop longtemps.
Quelqu'un peut-il m'aider ?

1 réponse

Messages postés
7378
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 mai 2021
122
Messages postés
231
Date d'inscription
lundi 22 avril 2013
Statut
Membre
Dernière intervention
26 janvier 2021
1
Dans un traitement complètement automatisé,
l'affichage de la boîte de dialogue du choix de
ces fichiers pourrait être omise, pour ne pas
interrompre par une requête manuel l'utilisateur!
Messages postés
7378
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 mai 2021
122
Bonjour denisbertin

oui bien sur il suffit de mettre le chemin du dossier en dur ici:

Dim di As New IO.DirectoryInfo(opendir.SelectedPath) 


a la place de
opendir.SelectedPath
et supprimer la boite de dialogue

@+ Le Pivert
Messages postés
231
Date d'inscription
lundi 22 avril 2013
Statut
Membre
Dernière intervention
26 janvier 2021
1
Je ne programme pas en Basic mais en Pascal (mon langage de prédilection) voici un exemple de code avec cette formulation :

FileAttrs := faAnyFile;
if SysUtils.findfirst(path+nom_joker,FileAttrs, sr) = 0 then
begin
repeat
if (sr.name<>'.') and (sr.name<>'..') then
begin
// Ajouter sr.name à la listbox
end;
until (SysUtils.FindNext(sr) <> 0) or bouton_stop.stopping;
end
SysUtils.FindClose(sr);
Messages postés
231
Date d'inscription
lundi 22 avril 2013
Statut
Membre
Dernière intervention
26 janvier 2021
1
Pour mémoire IO signifie Input/output, entrée ou sortie.
Messages postés
7378
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 mai 2021
122
Une petite recherche sur google t'aurait aider à trouver la signification de IO

https://msdn.microsoft.com/fr-fr/library/system.io.file(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1

PS je ne vois pas ce que fait un code Pascal dans le forum VB.Net!