PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV Mobile 2024 → Lister les fichiers d'un répertoire
Lister les fichiers d'un répertoire
Débuté par guest, 08 juin 2005 11:41 - 2 réponses
Posté le 08 juin 2005 - 11:41
Bonjour,

Débutant en windev je me heurte à certains problèmes bloquant le développement de mon application.
Je souhaite lister les fichiers d'un répertoire situé sur mon pocket afin de récupérer le nom de chacun. Pour le moment je récupère le nombre de fichiers de mon répertoire grâce à la fonction fListeFichier, mais je ne vois pas comment récupérer le nom des fichiers trouvés
J'ai essayé de déclarer une globale dans l'initialisation de mon projet pour lui donner une valeur dans ma fonction "callback", ma globale reste vide.
Ayant déja parcouru le forum j'ai pu trouver quelques informations comme par exemple utilisé une table cachée ou encore la fonction fRep mais je n'arrive pas à m'en servir correctement.

Merci aus personnes qui pourront m'éclairer à ce sujet,

Cordialement,
Thomas
Posté le 08 juin 2005 - 13:58
Voila une solution : (ce n'est juste que l'aide pas mal remagné)

SUR TON BOUTON, TA PROCEDURE, ETC. ( le lancement)

// Déclaration et initialisation des variables
NbFichierLS est un entier // Nombre de fichiers répondant aux critères
NbFichier est un entier // Nombre de fichiers de type "*.TXT"
NbFichier = 0
NbFichier = fListeFichier (fRepExe + "\*.*", "AttributFichier" )
// Affichage du nombre de fichiers répondant aux critères
Info("Il y a "+NbFichier+" fichiers listés sur le répertoire d'exécution du projet")
// Procédure locale appelée par fListeFichier




PROCEDURE AttributFichier(Repertoire, Nom, Change, NbFichierTXT)
Trace(Repertoire+Nom)
//Ou si tu préferes les enregistrer dans une liste
//ListeAjoute("<Nom de la liste>", Repertoire+Nom)


Cordialement.
Sylvain
Posté le 08 juin 2005 - 17:50
merci pour ton aide

une autre solution :

// Création du tableau permettant de stocker les noms des différents fichiers LOAD
Tab_ListeFicLOAD est un tableau de 0 chaînes

// Les fichiers présents dans le répertoire de chargement sont ajoutés au tableau
// qui contient en sortie tous les noms des fichiers à traiter par la suite
S_FicLOAD = fRep (S_CritèreRecherche, frFichier )
TANTQUE S_FicLOAD <> ""
TableauAjoute(Tab_ListeFicLOAD,S_FicLOAD)
S_FicLOAD = fRep ("", frFichier )
FIN
// Libére le repertoire bloquer par le fRep ci-dessus
fRep("")

Merci encore

Cordialement,
Thomas