Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

[WD8] Comment remplir une liste avec les noms des dossiers

3 réponses
Avatar
Eric BARMAZ
Bonjour tout le monde,

Je désire remplir une liste avec les noms des sous-dossiers d'un dossier
précis.

Comment dois-je procéder?
J'ai testé avec les fonction fRep et ListeAjoute avec une boucle TantQue.

TANTQUE fRep("",frRépertoire) <> ""
ListeAjoute("SélectionSource",fRep("",frRépertoire))
Trace (fRep(fRepEnCours+"*",frRépertoire))
FIN

Pourquoi cela ne fonctionne pas?

D'avance merci
Eric BARMAZ

3 réponses

Avatar
Eric BARMAZ
Correctif: Le code est :
TANTQUE fRep(fRepEnCours+"*",frRépertoire) <> ""
ListeAjoute("SélectionSource",fRep("",frRépertoire))
Trace (fRep(fRepEnCours+"*",frRépertoire))
FIN

La boucle me permet de lire le premier fichier, mais pas les suivants ...


"Eric BARMAZ" a écrit dans le message de news:
41c59b15$
Bonjour tout le monde,

Je désire remplir une liste avec les noms des sous-dossiers d'un dossier
précis.

Comment dois-je procéder?
J'ai testé avec les fonction fRep et ListeAjoute avec une boucle TantQue.

TANTQUE fRep("",frRépertoire) <> ""
ListeAjoute("SélectionSource",fRep("",frRépertoire))
Trace (fRep(fRepEnCours+"*",frRépertoire))
FIN

Pourquoi cela ne fonctionne pas?

D'avance merci
Eric BARMAZ



Avatar
Pascal F
Eric BARMAZ a écrit :
Bonjour tout le monde,

Je désire remplir une liste avec les noms des sous-dossiers d'un dossier précis.

Comment dois-je procéder?
J'ai testé avec les fonction fRep et ListeAjoute avec une boucle TantQue.

TANTQUE fRep("",frRépertoire) <> ""
ListeAjoute("SélectionSource",fRep("",frRépertoire))
Trace (fRep(fRepEnCours+"*",frRépertoire))
FIN

Pourquoi cela ne fonctionne pas?

D'avance merci
Eric BARMAZ



En utilisant la fonction fListeFichier et en testant les changements de répertoire ça devrait le faire
Bon WE

--
Pascal
Avatar
Eric BARMAZ
Super, j'ai trouvé ...
-----------------------------------------------------------
ResFichier est une chaîne

ResFichier = fRep("*",frRépertoire)
TANTQUE ResFichier <> ""
ListeAjoute(SélectionSource, ResFichier)
ResFichier = fRep("", frRépertoire)
Trace (ResFichier)
FIN
------------------------------------------------------------


"Eric BARMAZ" a écrit dans le message de news:

Correctif: Le code est :
TANTQUE fRep(fRepEnCours+"*",frRépertoire) <> ""
ListeAjoute("SélectionSource",fRep("",frRépertoire))
Trace (fRep(fRepEnCours+"*",frRépertoire))
FIN

La boucle me permet de lire le premier fichier, mais pas les suivants ...


"Eric BARMAZ" a écrit dans le message de news:
41c59b15$
Bonjour tout le monde,

Je désire remplir une liste avec les noms des sous-dossiers d'un dossier
précis.

Comment dois-je procéder?
J'ai testé avec les fonction fRep et ListeAjoute avec une boucle TantQue.

TANTQUE fRep("",frRépertoire) <> ""
ListeAjoute("SélectionSource",fRep("",frRépertoire))
Trace (fRep(fRepEnCours+"*",frRépertoire))
FIN

Pourquoi cela ne fonctionne pas?

D'avance merci
Eric BARMAZ