FORUM WINDEV

Bonjour,

Petite question un peu bette, voila je dois faire une petite application et pour cela je dois lire certains fichiers dans un répertoire mais seulement certains fichiers.
Les fichiers à lire ont un nom commençant par MD.
J'aimerai donc savoir si l'on peut lire le nom d'un fichier pour ensuite lire à l'intérieur.
Merci d'avance.

Cordialement, Dark

Regarde du côté de la fonction flistefichier qui te permet de lister les fichiers d'un répertoire et d'effectuer des traitements sur ces fichiers

Merci tegesto, je vien de regarder vite fait, fListeFichier et ListeFichier cela a plutot l'air de compter le nombre de fichier contenu dans un répertoire.
Je regarde cela de plus près et je dit le résultat demain
Merci encore

Non avec flistefichier tu parcours les fichiers d'un répertoire et tu leur appliques une procédure

Je pense que je vai utiliser ceci ca à l'air d'être correct comme programmation ^^


// Permet de lister tous les fichiers d'un répertoire
Recherch est une chaîne
sRepCourant est une chaîne = fRepEnCours()+"\*.*"
//On amorce la recherche. La constante FRFichier indique
//qu'on recherche des fichiers
sRecherch=fRep(sRepCourant,frFichier)
// Rechech = "" si plus de fichiers dans le répertoire
TANTQUE sRecherche <> ""
// On ajoute le fichier trouvé dans la liste LISTFIC
ListeAjoute(LISTE_FichierRepertoireCourant, sRecherch)
// On recherche le suivant
sRecherch=fRep("",frFichier)
FIN

Merci tegesto d'avoir pris le temps de me lire, de réfléchir et de m'avoir conduit sur la bonne voix, j'indiquerai plus tard si elle a marché

Ca marche mais comme ca c'est plus logique

il faut utiliser flistefichier comme ceci :


// Liste les fichiers commencant par "MD"
// Le parcours se fait également dans les sous-répertoires et est interruptible.
sRepCourant est une chaîne = fRepEnCours()+"\MD*.*"
ResListeFichier = fListeFichier(sRepCourant, frRécursif+frInterruptible)
// Pour chaque fichier trouvé
POUR TOUTE CHAÎNE UnFichier DE ResListeFichier SEPAREE PAR RC
// Ajout du fichier dans la table TableFic
listeAjoute(LISTE_FichierRepertoireCourant, UnFichier)
FIN

merci pour ton aide freddy77,
j'ai du laisser tomber mon programme un moment pour cause de travail plus urgent,
voilà, ma partie de programme ne marche pas du tout, car sRecherch reste toujours égal à ""
Je vien d'eesayer ce que tu m'as donné, mais a quoi correspond pour toi les variable :
LISTE_FichierRepertoireCourant , j'ai mit que c'était une chaîne
frInterruptible (cela doit etre une fonction mais moi il me le prend en tant que variable)
et
UnFichier est une chaîne

Merci d'avance freddy77

LISTE_FichierRepertoireCourant c'est une liste (dans la fenetre) qui recoit le nom des fichiers.

Mais tu peux mettre le resultat dans une table ou un hyperfile ou une table-memoire etc ...

moi j'utilise ca : sRecherch=fRep(sRepCourant,frFichier)
mais sRecherch = ""
Donc j'arrive a rien récupérer

si j'utilise ca : ResListeFichier = fListeFichier(sRepCourant, frRécursif+frInterruptible)
J'obtient un entier car fListeFichier renvoi un entier
Or c'est le nom du fichier que je veu récupérer et non le nombre du fichier du répertoire
:'(

tu dois avoir un pb avec le contenu de :

sRepCourant

il doit bien contenir

sRepCourant est une chaîne = fRepEnCours()+"\MD*.*"

Si je fait ça : sRepCourant est une chaîne = fRepEnCours()+"/*.*"
sRepCourant = C:\Mes Projets\EXPRESS_automatisation\Exe\*.*

Moi j'ai mit : sRepCourant est une chaîne = "C:\TEDESP\EAA\A021"+"\*.*"
comme ca j'obtient sRepCourant = C:\TEDESP\EAA\A021, car c'est dans ce répertoire que je veu effectué ma recherche

non le pb vient de la il faut qu'il y ait dans le chemin "\*.*" sinon ca marche pas

Mon code

sRecherch est une chaîne
LISTE_FichierRepertoireCourant est une chaîne
sRepCourant est une chaîne = "C:\TEDESP\EAA\A021"+"\*.*"

//permet de lister tous les fichiers d'un répertoire
//On amorce la recherche, la constante FRFichier indique qu'on recherche des fichiers
sRecherch=fRep(sRepCourant,frFichier)
// sRechech = "" si plus de fichiers dans le répertoire
TANTQUE sRecherch <> ""
// On ajoute le fichier trouvé dans la liste LISTFIC
ListeAjoute(LISTE_FichierRepertoireCourant, sRecherch)
// On recherche le fichier suivant
sRecherch=fRep("",frFichier)
FIN

Bon la le sRepCourant contient le bon truc le problème que j'avais bettement fait et que j'avais mit ça :
sRepCourant est une chaîne = "C:\TEDESP\EAA\A021\"+"\*.*"
sRepCourant = C:\TEDESP\EAA\A021\\*.*, normal qu'il buggé car \\ *_*
Merci de m'avoir aidé a trouver mon erreur freddy77


La j'ai un autre problème, quand j'exécute le programme pas à pas quand j'arrive à :
ListeAjoute(LISTE_FichierRepertoireCourant, sRecherch)
Il me dit que LISTE_FichierRepertoireCourant n'est pas une liste, hors pour ListeAjoute il faut :
ListeAjoute(une chaîne de caractère, une chaîne de caractère)
Si je met LISTE_FichierRepertoireCourant est une Liste
Il me souligne ListeAjoute et me dit que je doit avoir : ListeAjoute(une chaîne de caractère, une chaîne de caractère)

Je voit pas d'ou vient le problème là, car d'une manière ou d'une autre ils se contredisent.
Merci d'avance

mais il faut un champ liste dans la fenetre il faut :

insertion>champs>liste

et la nommer :

LISTE_FichierRepertoireCourant

Ok ça marche merci grandement freddy77