AppleScript的:从文件名创建新文件夹,移动文件到该文件夹 [英] AppleScript: Create new folder from file name and move file into that folder
问题描述
基本上,我试图创建一个的Automator文件夹操作所以每当一个文件被添加到特定的文件夹,它会创建一个匹配的文件名(不包括扩展名)的子文件夹,然后将文件移动到该子文件夹。
Basically, I'm trying to create a folder action in Automator so whenever a file is added to a specific folder, it will create a subfolder that matches the filename (without the extension), then move the file into that subfolder.
到目前为止,我已经成功地使用从该网站后(<一个href=\"http://stackoverflow.com/questions/4204372/create-new-folder-named-with-a-specified-file-name-in-automator\">Create在Automator的一个指定的文件名命名的新文件夹)创建一个脚本,将创建新的文件夹。不过,我一直无法修改脚本的原始文件移动到新文件夹。
So far, I have successfully used a post from this site (Create new folder named with a specified file name in Automator) to create a script that will create the new folder. However, I have been unable to modify the script to move the original file into the new folder.
任何帮助将是AP preciated。下面是完整的剧本,我有工作,以供参考:
Any help would be appreciated. Here is the full script I am working with for reference:
on run {input, parameters} -- make new folders from base file names
set output to {}
repeat with anItem in the input -- step through each item in the input
set anItem to anItem as text
tell application "System Events" to tell disk item anItem
set theContainer to path of container
set {theName, theExtension} to {name, name extension}
end tell
if theExtension is in {missing value, ""} then
set theExtension to ""
else
set theExtension to "." & theExtension
end if
set theName to text 1 thru -((count theExtension) + 1) of theName -- the name part
tell application "Finder"
make new folder at folder theContainer with properties {name:theName}
set end of output to result as alias
end tell
end repeat
return input -- or output
end run
在此先感谢!
推荐答案
这个文件夹操作添加到您的目标文件夹:
Add this folder action to your target folder:
on adding folder items to theFolder after receiving theFiles
repeat with aFile in theFiles
tell application "System Events" to set {Nm, Ex, pPath} to aFile's {name, name extension, POSIX path of container}
set BN to text 1 thru ((get offset of "." & Ex in Nm) - 1) of Nm
set thePath to (pPath & "/" & BN & "/" as text)
do shell script "mkdir -p " & quoted form of thePath
delay 0.5
tell application "Finder" to move aFile to POSIX file thePath
end repeat
end adding folder items to
这篇关于AppleScript的:从文件名创建新文件夹,移动文件到该文件夹的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!