本家BBSにて、動的にHTMLを記述するスクリプトを見て作成。
IEはあまり好きではないのですが（普段はFxを使用）、ほぼすべての環境で動作する点が長所ですね。
hspailさんのスクリプトをほぼそのまま流用しています（感謝！）が、とても基本的なスクリプトなので著作権は発生しないと考え、無許可で載せています。
ついでにmod_rss.asを利用してみました。mod_rss.as内部ではCOMを利用しています。#include "mod_rss.as"
// RSSリーダーサンプル
// 付属サンプル（rssload.hsp）を改造
// また、HSPTV!のBBSよりhspailさんのスクリプトを参考とさせていただきました。
title "Loading..."
url="http://hspwiki.tm.land.to/?cmd=rss&ver=1.0"
rssload desc, link, url, 15
if stat == 1 : dialog "取得に失敗しました。" : end
if stat == 2 : dialog "RSSではありません。" : end
axobj ie, "Shell.Explorer.2", ginfo_winx, ginfo_winy
if stat == -1 {
dialog "ActiveXコントロールの配置に失敗しました。", 1
end
}
title url
code = {"<html><body>
\t<p>クリックすると別ウィンドウでリンク先を開きます。</p>
\t<ol>\n"}
foreach desc
code += "\t<li><a href=\"" + link(cnt) + "\" target=\"_blank\">" + desc(cnt) + "</a></li>\n"
loop
code += "\t</ol>\n</body></html>"
ie -> "Navigate" "about:blank"
doc = ie("Document")
doc -> "write" code
stop
2007年11月27日火曜日
IEコンポーネントによるRSSリーダー
登録:
コメントの投稿 (Atom)
0 件のコメント:
コメントを投稿