勝手に添削:bookmarklet - ページに含まれるURLを抽出してTSVにする

一回やってみたかったんだ、「勝手に添削」
しかも、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動きます。

更に、上記で出力したページからWin+IEで小ピーしてExcelにはりつけてもうまくセルに合わなかったので、<plaintext>じゃなくて<textarea>に出力したらうまくいきました。

Extract Links as TSV (window+textarea)
javascript:(function(){w=window.open('','');d=w.document;d.open();d.write('<textarea>'+(function(a){var r=[];function e(s){return s.replace(/</g,'&lt;').replace(/>/g,'&gt;');}for(var i=0;i<a.length;i++)r[i]=e(a[i].innerHTML)+'\t'+e(a[i].href);return r.join('\n')+'</textarea>';})(document.getElementsByTagName('A')));d.close();})();

HTMLタグエスケープしなきゃいけなかったので、ちょっと面倒ですが。

ついでのついでに、見るだけだったらtableの方がいいかもと思ってこちらも作りました。

Extract Links as TSV (window+table)
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,'&lt;').replace(/>/g,'&gt;');}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!

同じカテゴリーの記事

このページの一番上に戻る
  • Facebook
  • Twitter
  • Tumblr
  • Instagram
  • miil