Discussion :

[nekcorp]

Bonjour,

Je souhaite faire une boucle sur plusieurs dossiers présents dans un dossier nommé Folder1.
Je souhaite également récupérer le nom de tout les dossiers comme avec cet exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
tell application "Finder"
	set theFolder to choose folder
	set NameFile to name of theFolder
end tell

Quelqu'un pour m'aider ?

[PBELL]

Bonjour Nekcorp,
Voici, je pense, ce qui réponds à ta demande :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
set Le_Dossier to choose folder with prompt "Sélectionner le dossier de départ"
tell application "Finder"
    set Sous_dossiers to every folder of Le_Dossier
    repeat with Un_Dossier in Sous_dossiers
        set Nom to name of Un_Dossier
    end repeat
end tell

Note bien que ce script se limite aux sous-dossiers contenus dans le dossier de départ, sans récursivité vers les sous-dossiers de ces sous-dossiers...
Pour avoir tous les sous-dossiers sans limite de profondeur, il suffit de corriger la ligne 3 avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    set Sous_dossiers to every folder of entire contents of Le_Dossier

Cordialement