这就是我想要做的。
我有一个文件结构,其中包含 JPG 和 RAW 格式的照片。这是一个名为“照片”的文件夹,其中包含按日期划分的子文件夹。我只想将 RAW 照片复制到一个新文件夹“Photos RAW”,但按拍摄/创建日期保留结构。
我可以使用 automator 或 applescript 仅将文件复制到一个新目录,但是如何使用 applescript 遍历目录树以便覆盖所有子文件夹?
这就是我想要做的。
我有一个文件结构,其中包含 JPG 和 RAW 格式的照片。这是一个名为“照片”的文件夹,其中包含按日期划分的子文件夹。我只想将 RAW 照片复制到一个新文件夹“Photos RAW”,但按拍摄/创建日期保留结构。
我可以使用 automator 或 applescript 仅将文件复制到一个新目录,但是如何使用 applescript 遍历目录树以便覆盖所有子文件夹?
尝试这个。您会看到我也使用“全部内容”来获取子文件夹中的文件。
set extensionToFind to "raw"
set topLevelFolder to (choose folder) as text
set pathCount to count of topLevelFolder
tell application "Finder"
-- get the files
set rawFiles to files of entire contents of folder topLevelFolder whose name extension is extensionToFind
if rawFiles is {} then return
-- setup the folder where the files will be moved
set rawFolder to ((container of folder topLevelFolder) as text) & "Photos_Raw:"
do shell script "mkdir -p " & quoted form of POSIX path of rawFolder
repeat with aFile in rawFiles
set aFileContainer to (container of aFile) as text
if topLevelFolder is equal to aFileContainer then
-- here the file is at the top level folder
set newPath to rawFolder
else
-- here we calculate the new path and make sure the folder structure is in place
set thisFile to aFile as text
set subFolderPath to text (pathCount + 1) thru -((count of (get name of aFile)) + 1) of thisFile
set newPath to rawFolder & subFolderPath
do shell script "mkdir -p " & quoted form of POSIX path of newPath
end if
move aFile to folder newPath
end repeat
end tell