@Oliver74000
Bonjour,
Après avoir regardé de plus prés, pour changer la date du fichier par la date de création de la vidéo il suffit de remplacer : -DateTimeOriginal par -CreateDate.
Ce qui donne comme nouveau script:
Bonjour,
Après avoir regardé de plus prés, pour changer la date du fichier par la date de création de la vidéo il suffit de remplacer : -DateTimeOriginal par -CreateDate.
Ce qui donne comme nouveau script:
Bloc de code:
-- remplace date du fichier par la date exif creation
tell application "Finder"
set Chemin to choose folder with prompt "Sélectionnez le dossier contenant les fichiers à redater"
my inspecter(Chemin)
end tell
on inspecter(un_dossier)
tell application "Finder"
-- traitement des fichiers :
set les_fichiers to files of un_dossier
repeat with chaque_fichier in les_fichiers
-- traitement d'un fichier
set chaque_fichier to chaque_fichier as string
try
set datephoto to do shell script "/usr/local/bin/exiftool -CreateDate " & quoted form of POSIX path of chaque_fichier -- avec exiftool installé
on error
set datephoto to ""
end try
if length of datephoto > 20 then
set DateOriginale to text -20 thru -1 of datephoto
set ladate to text 1 thru -16 of DateOriginale
set ladate to ladate & text 7 thru -13 of DateOriginale
set ladate to ladate & text 10 thru -10 of DateOriginale
set ladate to ladate & text 13 thru -7 of DateOriginale
set ladate to ladate & text 16 thru -4 of DateOriginale
set ladate to ladate & "." & text 19 thru -1 of DateOriginale
do shell script "touch -t " & ladate & " " & quoted form of POSIX path of chaque_fichier
end if
end repeat
-- traitement des dossiers :
set les_dossiers to folders of un_dossier
repeat with chaque_dossier in les_dossiers
-- traitement d'un dossier
my inspecter(chaque_dossier)
end repeat
end tell
end inspecter
tell application "Finder"
(display dialog ("waouou ... Ca y est c'est fait !") buttons {"Salut !"})
end tell
