I have figured out how to get Yojimbo to add the PDF to multiple folder
collections (see below).
Does anyone know how I could also encrypt the PDF in applescript as well?
[code]
----------------------------------------------------------
-- Save PDF to Yojimbo and Tag
--
-- Allows you to rename and add tags to a Yojimbo item you add using print
-- to PDF.
--
-- Save as a script to ~Library/PDF Services
----------------------------------------------------------
on open (theFile)
----------------------------------------------------------
-- set chooseTagsfromList to true if you want the script to present you
with
-- a list of tags to pick from. Set it to false if you want to manually
enter the
-- tags. If you manually enter tags, separate tags with commas.
----------------------------------------------------------
set chooseTagsFromList to true
set chooseCollectionsFromList to true
set theName to text returned of (display dialog "Name:" default answer
"")
if not chooseTagsFromList then
set restoreDelimiters to AppleScript's text item delimiters
set AppleScript's text item delimiters to ","
set theTags to text returned of (display dialog "Tags:" default answer
"")
set the chosenTagList to every text item of theTags
end if
tell application "Yojimbo"
set allTags to name of every tag
if chooseTagsFromList then
set chosenTagList to choose from list allTags ¬
with title ¬
"Tags" with prompt ¬
¬
"Choose Tags:" multiple selections
allowed true ¬
with empty selection allowed
end if
set allCollections to (name of every folder collection)
if chooseCollectionsFromList then
set chosenCollectionList to choose from list
allCollections ¬
with title ¬
"Collections" with prompt ¬
¬
"Add PDF to which collection?" multiple
selections allowed true ¬
with empty selection allowed
end if
set n to import theFile
set name of n to theName
add tags chosenTagList to n
repeat with i from 1 to the count of chosenCollectionList
add n to folder collection named (item i of
chosenCollectionList)
end repeat
end tell
if not chooseTagsFromList then
set AppleScript's text item delimiters to restoreDelimiters
end if
end open
[/code]
_________________________________________________________________
Advertisement: New jobsjobsjobs.com.au. Find thousands of jobs online now!
http://a.ninemsn.com.au/b.aspx?URL=http%3A%2F%2Fad%2Eau%2Edoubleclick%2Enet%2Fclk%3B114014868%3B17770752%3Bi%3Fhttp%3A%2F%2Fwww%2Ejobsjobsjobs%2Ecom%2Eau&_t=762242361&_r=Hotmail_email_tagline_July07&_m=EXT
--
------------------------------------------------------------------
This message is sent to you because you are subscribed to
the mailing list <[email protected]>.
To unsubscribe, send mail to: <[EMAIL PROTECTED]>
List archives: <http://www.listsearch.com/yojimbotalk.lasso>
Have a feature request, or not sure if the software's working
correctly? Please send mail to: <[EMAIL PROTECTED]>
