Get JPG save as source folder icon ?

Question

I posed this in scripting but might be more suitable in this forum.
Hello Everyone,
I would like to use a script to set the source folder icon by selecting an image.
after much searching i found this. (but it's to long of GUI process)
This one worked perfectly!
--CODE (for AppleScript Studio script)
set srcpath to POSIX path of (choose file with prompt "Choose source image file.")
set dstpath to POSIX path of (choose folder with prompt "Choose target folder.")
--set dstpath to dstpath's text 1 thru -2 -- remove last slash if necessary.
setIcon(srcpath, dstpath)
on setIcon(srcpath, dstpath)
set nsimg to load image srcpath
set nswks to call method "sharedWorkspace" of class "NSWorkspace"
set r to call method "setIcon:forFile:options:" of nswks with parameters {nsimg, dstpath, 0}
delete nsimg
return r
end setIcon
--END OF CODE
I don't want to interact with it. Just a simple CTRL click (Contextual Menu Item).
Currently have no Idea where to go with this. Any Thought?

Answer 1

If you're open to the idea of using GUI scripting, you might try creating an Automator workflow comprised of a single action: *Run AppleScript* (from the Automator library).
Replace the pre-populated text in the Run AppleScript action's text area with the script below:
*on run {input, parameters}*
*tell application "Finder"*
*set theSelection to selection as alias*
*set theImage to choose file with prompt "Choose source image file." without invisibles*
*tell application "Preview" to activate*
*tell application "Preview" to open theImage*
*tell application "System Events"*
*tell process "Preview"*
*keystroke "c" using command down*
*end tell*
*tell application "Preview" to quit*
*delay 1 -- adjust as needed*
*set theFolder to theSelection*
*tell application "Finder"*
activate
*reveal theFolder*
*end tell*
*tell process "Finder"*
*keystroke "i" using command down*
*keystroke tab*
*keystroke "v" using command down*
*keystroke "w" using command down*
*delay 1 -- adjust as needed*
*keystroke "w" using command down*
*end tell*
*end tell*
*end tell*
*return input*
*end run*
From Automator's File menu choose Save As Plug-in > Plug-in for: Finder, and give it a name such as "Set Folder Image."
To invoke the action, right-click or Control-click on a desired source folder and select the "Set Folder Image" plug-in from the contextual menu, under Automator. When the Choose-a-File dialog appears, navigate to the desired image file, select it, and press Choose.
Note that as GUI scripting is used here, you'll need to make sure that under System Preferences > Universal Access, "Enable access for assistive devices" is checked.
If you find that the script stalls before Preview quits, or if the two Finder windows which are meant to open fail to close before the workflow completes, try increasing the delay times where indicated.
The plug-in worked for me in Tiger; untested in Leopard, your results may vary... Good luck.