![]() |
Bienvenue invité ( Connexion | Inscription )
![]() |
![]() ![]()
Message
#1
|
|
Adepte de Macbidouille ![]() Groupe : Membres Messages : 109 Inscrit : 11 Jan 2010 Membre no 148 488 ![]() |
Bonjour,
Je possède un dossier images/ dans lequelle il y à des des sous dossier sur plus de 10 niveaux, dans presque chaque sous dossier, il y à des photos; je souhaiterais développer un applescript qui me scan le dossier image (en recursive donc) et qui affecte par exemple un tag vert pour les photos portrait et un tag rouge pour les photos paysage. Vous pensez que c'est possible ? tout en gardant bien sur les sous-sous dossier à leurs place. Merci pour votre aide. |
|
|
![]() |
![]()
Message
#2
|
|
Macbidouilleur de vermeil ! ![]() ![]() ![]() ![]() Groupe : Membres Messages : 879 Inscrit : 4 Apr 2004 Lieu : Lorraine - 54 Membre no 17 184 ![]() |
Essai avec ce code, à supposer que tu as bien un disque monté qui s'appelle PHOTOS (sinon à adapter au nom de ton volume)
Ici il ne trouve pas toutes les photos mais seulement le jpg ... Tu auras donc un résultat seulement si c'est la bonne extension. Si tu as plusieurs types d'extensions dans tes photos dis moi lesquelles Code property ajout : {}
property sous_dossiers : {} property masterFolder : "" property dossier_a_traiter : "" on rechercheFichiers(d) -- recherche fichiers et dossiers set tFiles to do shell script "/usr/bin/find " & (quoted form of d) & " \\! -name '.*' -name '*.jpg' " if tFiles is not "" then return paragraphs of tFiles return "Aucun fichier trouvé" end rechercheFichiers on idle set dossier_a_traiter to "/Volumes/PHOTOS" --**** tell my rechercheFichiers(dossier_a_traiter) to if it is not "" then my action7(it) -- si des éléments sont trouvés, execute la fonction action7 end idle on action7(tFiles) return tFiles -- pas de traitement mais juste la liste des fichiers à traiter end action7 idle {} -- uniquement en test pour que le script se lance depuis l'éditeur. Ce message a été modifié par teddy7545 - 20 Apr 2018, 21:33. -------------------- MP Intel Dual Xéon 3 GHz - MacOSX 10.10.3 - ATI Radeon HD 5770 - ATTO UL5D - Apple Cinema HD Display 23 pouces MBP 15' 2017 - MBP 13' mid 2009 - iMac 24' 8,1 2,8GHz - MP G4 MDD Bi 1,25 GHz - MP G4 Quicksylver 933MHz |
|
|
![]() ![]() |
Nous sommes le : 18th July 2025 - 14:49 |