1
minamike 2017-03-12 10:59:42 +08:00
applescript
``` (* Veritrope.com Open Chrome Tabs in Safari Version 1.0 April 18, 2011 // TERMS OF USE: This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 Unported License. To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-sa/3.0/ or send a letter to Creative Commons, 444 Castro Street, Suite 900, Mountain View, California, 94041, USA. // LIKE THIS SCRIPT? If this AppleScript is helpful to you, please show your support here: http://veritrope.com/support // SCRIPT INFORMATION AND UPDATE PAGE http://veritrope.com/code/open-chrome-tabs-in-safari // REQUIREMENTS More details on the script information page. // CHANGELOG 1.0 Initial Release *) (* ====================================== // MAIN PROGRAM ====================================== *) set list_Tabs to {} tell application "Google Chrome" set the_Tabs to (tabs of every window) repeat with the_Tab in the_Tabs set the_Items to (every item of the_Tab) repeat with the_Item in the_Items copy URL of the_Item to end of list_Tabs end repeat end repeat end tell tell application "Safari" repeat with list_Tab in list_Tabs set myTab to make new tab at end of tabs of window 1 set URL of myTab to list_Tab end repeat end tell ``` 来自 http://veritrope.com/code/open-chrome-tabs-in-safari/ |