创建文件夹移动文件 - Applescript

Create folder move files - Applescript

我正在寻找:

  1. 从桌面移动文件夹

    1a。创建一个文件夹 set jobName to text returned of (display dialog "Please enter Job Name:" default answer "Job_Name")

    1b。将文件夹从桌面拖放到 在 newfo 新建文件夹,属性为 {name:"Emails"}

脚本:

set jobName to text returned of (display dialog "Please enter Job Name:" default     answer "Job_Name")
set loc to choose folder "Choose Parent Folder Location"

tell application "Finder"
set home_path to home as text
set source to alias (home_path & "Desktop:WorkingFolder")
set newfo to make new folder at loc with properties {name:jobName}
    make new folder at newfo with properties {name:"Emails"}

set destination to home_path & jobName

tell application "Finder" to duplicate source to destination with replacing
end tell

如有任何帮助,我们将不胜感激。谢谢,

这是您要实现的目标吗?

    set jobName to text returned of (display dialog "Please enter Job Name:" default answer "Job_Name")
set loc to choose folder with prompt "Choose Parent Folder Location"

tell application "Finder"
    set source to alias ((path to desktop as text) & "WorkingFolder:")
    set newfo to make new folder at loc with properties {name:jobName}
    make new folder at newfo with properties {name:"Emails"}
    set destination to make new folder at (path to home folder) with properties {name:jobName}
    tell application "Finder" to duplicate source to destination with replacing
end tell