一回やってみたかったんだ、「勝手に添削」
しかも、dankogaiさんの（笑）
お題は下記です。
・CodeZine：Webページに含まれるURLを抽出し、Excelにまとめて保存する（HTA）
・404 Blog Not Found:bookmarklet – ページに含まれるURLを抽出してTSVにする
IEだけじゃイカンという意味では、danさんの記事に賛成。
ですが、
例えばSafari3では下がうまく行かず(ウィンドウに何も表示されない)、Firefox2では上がうまく行きません(一行しかpromptに入らない)。OperaはどちらもOK(優秀!)。IEは未確認(報告お願いします)。ブラウザーにあわせて使い分けて下さい。
via: 404 Blog Not Found:bookmarklet – ページに含まれるURLを抽出してTSVにする
というわけで、クロスブラウザになってませんねw
FFのpromptに複数行の文字列を入れられないのはどうしようもないので、別ウィンドウに開く場合にSafariで動かない件に対応してみましょう。
Extract Links as TSV (window)
javascript:(function(){w=window.open('','');d=w.document;d.open();d.write('<plaintext>'+(function(a){var r=[];for(var i=0;i<a.length;i++)r[i]=a[i].innerHTML+'\t'+a[i].href;return r.join('\n');})(document.getElementsByTagName('A')));d.close();})();
多分、document.open();document.close();を省略したのがマズかったんじゃないかと思います。あと、voidで全部を囲ってるのもあやしいかったけど、とりあえず上記で、IE/FF/Safari動きます。 ‘;return r.join(”)+’‘;})(document.getElementsByTagName(‘A’)));d.close();})();”>Extract Links as TSV (window+table)
更に、上記で出力したページからWin＋IEで小ピーしてExcelにはりつけてもうまくセルに合わなかったので、<plaintext>じゃなくて<textarea>に出力したらうまくいきました。
‘+(function(a){var r=[];function e(s){return s.replace(//g,’>’);}for(var i=0;i‘+e(a[i].innerHTML)+’
‘+e(a[i].href)+’
javascript:(function(){w=window.open('','');d=w.document;d.open();d.write('<ta'+'ble border=1>'+(function(a){var r=[];function e(s){return s.replace(/</g,'<').replace(/>/g,'>');}for(var i=0;i<a.length;i++)r[i]='<tr><td>'+e(a[i].innerHTML)+'</td><td>'+e(a[i].href)+'</td></tr>';return r.join('')+'</ta'+'ble>';})(document.getElementsByTagName('A')));d.close();})();
enjoy!
