Hello,
I’m a total Noob on applescripting, i work i a graphic agency and i want to start a little automated workflow in this place…
I found this script somewhere and i would like to change the behaviour of it…
The input folder tree should be fixed… so it doesn’t asks for the tree but takes on from a place on the users folder
then the script should bring out a dialog box… asking for a name to rename the copied tree on the server volume (the first folder)…
The place we’re the folder is created is always the same…
found this script that basically does the tree copying…
---------------------------------------------------------------------------------------
-- Copy folder tree
-- by Jeff Fischer <jeff@5fischers.org>
--
-- credit to Dan Decker and Robert Metzker for ideas from their scripts
---------------------------------------------------------------------------------------
-- make gFileTypes an empty set to omit copying/moving any files
property gFileTypes : {"psd", "jpg", "gif", "jpeg"}
tell application "Finder"
set tSourceFolder to choose folder with prompt "Choose a folder structure to duplicate"
if tSourceFolder is false then return "User Cancelled"
set tDestFolder to choose folder with prompt "Choose the location for the duplicate structure"
if tDestFolder is false then return "User Cancelled"
my copyItems(tSourceFolder, tDestFolder)
end tell
on copyItems(pSourceFolder, pDestFolder)
tell application "Finder"
set tSourceFolderName to name of pSourceFolder as string
make new folder at pDestFolder with properties {name:tSourceFolderName}
set tNewDestFolder to (folder tSourceFolderName of folder pDestFolder) as alias
-- copy or move over files of the specified type(s)
set tSelectedFiles to (every file of folder pSourceFolder whose name extension is in gFileTypes)
if tSelectedFiles ≠{} then
select (every file of folder pSourceFolder whose name extension is in gFileTypes)
try
-- uncomment the action you want, either copy or move
-- copy the selection to folder tNewDestFolder
move the selection to folder tNewDestFolder
close window (name of folder pSourceFolder as string)
end try
end if
-- copy over the folders, calling this handler recursively
set tFolders to (every folder of pSourceFolder)
repeat with tThisFolder in tFolders
my copyItems(tThisFolder as alias, tNewDestFolder as alias)
end repeat
end tell
end copyItems
I searched for a usable script for a while but i can’t find one that suits my needs…
thx for the help…