要は、Safari ブラウザで いま表示しているページにリンクを張るHTMLコードを作ってくれます。
下図のように、Safari で表示しているURL（下図では、『http://blog.goo.ne.jp/vallie』）と Safari で表示しているそのページのタイトル（下図では、『GameSprit』）を取得し、次のようなHTMLコードを生成し、確認のためにダイアログを出し、クリップボードにコピーします。
どこかに、ペーストすれば、次のようなコードが貼付けられるわけです。
<a href="http://blog.goo.ne.jp/vallie" target=_blank>GameSprit</a>
『 target=_blank>』をつけているので、リンク先が別ウィンドウで開きます。
上のコードをスクリプトエディタに貼り付けて、アプリケーションとして保存し、Dock に置いておけば、手軽にHTMLリンクを作成できます。
下図のように、Safari で表示しているURL（下図では、『http://blog.goo.ne.jp/vallie』）と Safari で表示しているそのページのタイトル（下図では、『GameSprit』）を取得し、次のようなHTMLコードを生成し、確認のためにダイアログを出し、クリップボードにコピーします。
どこかに、ペーストすれば、次のようなコードが貼付けられるわけです。
<a href="http://blog.goo.ne.jp/vallie" target=_blank>GameSprit</a>
『 target=_blank>』をつけているので、リンク先が別ウィンドウで開きます。
tell application "Safari" --または"Shiira"
try
set theUrl to (URL of document 1)
set theTitle to (name of document 1)
on error
beep 2
return
end try
end tell
set theInfo to "<a href=＼"" & theUrl & "＼" target=_blank>" & theTitle & "</a>"
set the clipboard to theInfo
display dialog theInfo
-- on Leopard, Mac OS 10.5.4
『＼』は、本当は半角です。
上のコードをスクリプトエディタに貼り付けて、アプリケーションとして保存し、Dock に置いておけば、手軽にHTMLリンクを作成できます。
