Ich würde gerne diese Script nutzen, weiss aber leider nicht wie und wo ich es in DevonThink Pro Office einbinden kann/muss!
Hat jemand eine Anleitung für mich!
Habe das Script hier im Forum gefunden:
– Duplicate hierarchy
tell application id “DNtp”
try
set theNum to my duplicateGroups(the selection, incoming group of current database, " copy")
if theNum is 0 then error “Please select one or more groups.”
on error error_message number error_number
if the error_number is not -128 then display alert “DEVONthink Pro” message error_message as warning
end try
end tell
on duplicateGroups(theRecords, theDestination, theSuffix)
local theRecord, theName, theCopy, theNum
set theNum to 0
tell application id “DNtp”
repeat with theRecord in theRecords
if type of theRecord is group then
set theName to ((name of theRecord) as string) & theSuffix
set theCopy to create record with {name:theName, type:group} in theDestination
set theNum to theNum + (my duplicateGroups(children of theRecord, theCopy, “”)) + 1
end if
end repeat
end tell
return theNum
end duplicateGroups
