maybe http://bbs.macscripter.net/ is a good place.....its a wonderful
forum for applescript
On Sep 5, 9:56 pm, sanzoghenzo <[EMAIL PROTECTED]> wrote:
> hi all,
> I look for a custom action to add a folder to my iTunes Library.
> I tried to write my own action, but it doesn't work.
> Can someone help me?
> Thanks in advance fot the help.
> here's the applescript code I copied from the net and modified:
>
> on open these_items
> set these_paths to ""
> set the counter to 0
> repeat with i from 1 to the count of these_items
> set this_item to item i of these_items as alias
> set the item_info to info for this_item
> if folder of the item_info is true then
> process_folder(this_item as alias)
> else if (alias of the item_info is false) and ((the file type
> of the
> item_info is in the type_list) or the name extension of the item_info
> is in the extension_list) then
> process_item(this_item as alias)
> end if
> end repeat
> my growlRegister()
> growlNotify("Add To iTunes Library", (the counter as string) & "
> items have been added to the iTunes library.")
> end open
>
> property type_list : {"MPG3", "MIDI", "AIFF"}
> property extension_list : {"mp3", "mid", "aif", "wav", "m4a"}
>
> global counter, source_folder, selection_list, these_items
>
> -- this sub-routine processes folders
> on process_folder(this_folder)
> set these_items to list folder this_folder without invisibles
> repeat with i from 1 to the count of these_items
> set this_itemPath to this_folder & (item i of these_items) as
> string
> set this_item to this_itemPath as alias
> set the item_info to info for alias this_itemPath
> if folder of the item_info is true then
> process_folder(this_item)
> else if (alias of the item_info is false) and ((the file type
> of the
> item_info is in the type_list) or the name extension of the item_info
> is in the extension_list) then
> process_item(this_item)
> end if
> end repeat
> end process_folder
>
> -- this sub-routine processes files
> on process_item(this_item)
> tell application "iTunes"
> launch
> add this_item to playlist "Library" of source "Library"
> end tell
> set counter to counter + 1
> end process_item
>
> using terms from application "GrowlHelperApp"
> on growlRegister()
> tell application "GrowlHelperApp"
> register as application "Add to iTunes Library" all
> notifications
> {"Alert"} default notifications {"Alert"} icon of application "iTunes"
> end tell
> end growlRegister
>
> on growlNotify(grrTitle, grrDescription)
> tell application "GrowlHelperApp"
> notify with name "Alert" title grrTitle description
> grrDescription
> application name "Add to iTunes Library"
> end tell
> end growlNotify
> end using terms from
