AppleScriptでブラウザ(Safari)で開いているリンクとタイトルを取得

肝はこの辺・・・

配列の定義と要素追加

--定義
set linkArray to {}

--要素の追加
set the end of linkArray to {urlTitle:tabName, urlLink:tabURL}

アプリケーション(Safari)に指示を出す

tell application "Safari"

end tell

１つのウインドウ内にあるタブの数

-- tell application "Safari"内で・・・
set tabcount to number of tabs in window inWindowNumber

指定回数のループ

--1〜タブ数までループ、変数yがインクリメントされる
repeat with y from 1 to タブ数

end repeat

コード全体

-- ========================================
-- 戻り値：配列
--   key : urlTitle
--   key : urlLink
-- ========================================
to tellSafariToGetURLsOfWindowByWindowNumber(inWindowNumber)
    set linkArray to {}
    tell application "Safari"
        set tabcount to number of tabs in window inWindowNumber
        try
            set tabcount to number of tabs in window inWindowNumber

            repeat with y from 1 to tabcount
                --Get Tab Name & URL
                set tabName to name of tab y of window inWindowNumber
                set tabURL to URL of tab y of window inWindowNumber
                set the end of linkArray to {urlTitle:tabName, urlLink:tabURL}
            end repeat
        end try
    end tell
    return linkArray
end tellSafariToGetURLsOfWindowByWindowNumber

実行

tellSafariToGetURLsOfWindowByWindowNumber(1)

結果

qiitaのページをタブで２つ開いたウインドウの結果

{{urlTitle:"ホーム - Qiita", urlLink:"http://qiita.com/"}, {urlTitle:"ホーム - Qiita", urlLink:"http://qiita.com/"}}