groups

name language licence
Cleanup @ Entries - Address Book AppleScript Other
Detect Name Switch - Address Book AppleScript Other
ShellCommand AppleScript Other
theme_open AppleScript Other
Google_Search AppleScript Other
RapidWeaver_Addons_version AppleScript Other
check_safari_page_loaded_handler AppleScript Other
On-Off_AppToggle AppleScript Other

< 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 >



language: AppleScript
licence: Other

theme_open

options: view full snippet • send to code collector 
-- For support reasons I need to visit the same locations on a regular basis.
-- By entering the theme name in question I can open the product's info site, demo site and location on my drive

-- by Adam Merrifield <http://www.seydoggy.com>
-- r1 10-13-09 17:00

tell application "System Events" to set frontmost of process "FastScripts" to true
set themeName to text returned of (display dialog "Enter theme name:" default answer "" buttons {"Cancel", "OK"} default button 2)
tell application "Path Finder" to open "seyDoggy:Users:adam:Documents:seyDoggy Internet Solutions:themes:_active:" & themeName
tell application "Safari" to open location "http://www.seydesign.com/themes/" & themeName
tell application "Safari" to open location "http://showcase.seydesign.com/" & themeName
tell application "Safari" to activate
(Continues...)