ミックス・イズを楽しもう！

-------- -- --:--

上記の広告は１ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

2006-11-15 Wed 15:57

RSSフィードをHTML文書に変換するためのXSLTスタイルシート（rss10.xsl）
このXSLTスタイルシートではRSSフィード上の新着情報10件を表示する。表示件数を変更したい場合は太字部分を適切な値に変更すればよい。

----------------------------------------------------------------------

＜?xml version="1.0" encoding="Shift_JIS" ?＞
＜xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:rss="http://purl.org/rss/1.0/"
xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
xmlns:dc="http://purl.org/dc/elements/1.1/" version="1.0"＞
＜xsl:template match="/rdf:RDF"＞
＜ul type="square"＞
＜xsl:for-each select="rss:item"＞
＜xsl:sort select="dc:date" data-type="text" order="descending" /＞
＜xsl:sort select="title" data-type="text" order="ascending" /＞
＜xsl:if test="position()<=10"＞
＜li＞
＜xsl:element name="a"＞
＜xsl:attribute name="href"＞
＜xsl:value-of select="rss:link" /＞
＜/xsl:attribute＞
＜xsl:value-of select="rss:title" /＞
＜/xsl:element＞
＜/li＞
＜/xsl:if＞
＜/xsl:for-each＞
＜/ul＞
＜/xsl:template＞
＜/xsl:stylesheet＞

------------------------------------------------------------------------

RSSフィードをXSLT変換するためのWebフォーム（C#版：rssReader_cs.aspx）

------------------------------------------------------------------------

＜%@ Page Language="C#" ContentType="text/html" %＞
＜%@ Import Namespace="System.Net" %＞

＜script runat="Server"＞
public void Page_Load(Object sender, EventArgs e){
WebClient myClient = new WebClient();
// 取得したRSSフィード（文字列）をXmlコントロールにセット
rss.DocumentContent = Encoding.GetEncoding("Shift_JIS").GetString(
myClient.DownloadData("http://www.wings.msn.to/contents/rss.php"));
// 適用するXSLTスタイルシートのパスをXmlコントロールにセット
rss.TransformSource = "rss10.xsl";
}
＜/script＞
＜html＞
＜head＞
＜title＞RSSフィードの取得＜/title＞
＜/head＞
＜body＞
＜asp:Xml id="rss" runat="Server" /＞
＜/body＞
＜/html＞

-----------------------------------------------------------------------

RSSフィードをXSLT変換するためのWebフォーム（VB.NET版：rssReader_vb.aspx）

-----------------------------------------------------------------------

＜%@ Page Language="VB" ContentType="text/html" %＞
＜%@ Import Namespace="System.Net" %＞

＜script runat="Server"＞
Public Sub Page_Load(sender As Object, e As EventArgs)
Dim myClient As New WebClient()
' 取得したRSSフィード（文字列）をXmlコントロールにセット
rss.DocumentContent = Encoding.GetEncoding("Shift_JIS").GetString( _
myClient.DownloadData("http://www.wings.msn.to/contents/rss.php"))
' 適用するXSLTスタイルシートのパスをXmlコントロールにセット
rss.TransformSource = "rss10.xsl"
End Sub
＜/script＞
＜html＞
＜head＞
＜title＞RSSフィードの取得＜/title＞
＜/head＞
＜body＞
＜asp:Xml id="rss" runat="Server" /＞
＜/body＞
＜/html＞

別窓 | 未分類 | コメント:0 | トラックバック:0 |

RSSを読み込む・・・

2006-11-14 Tue 04:17

// 必要パッケージの読込み
require_once("magpierss/rss_fetch.inc");

// キャッシュは5分に設定
define("MAGPIE_CACHE_AGE", 60*5);

// キャッシュ保存ディレクトリ指定
define("MAGPIE_CACHE_DIR", "cache/");

// エンコーディングの設定
define("MAGPIE_OUTPUT_ENCODING","UTF-8");

// 取得するRSSのURL
$url = "http://picks.dir.yahoo.co.jp/topics/rss/";
$rss = fetch_rss( $url );

header("Content-type:text/html;charset=euc-jp");
echo "タイトル：". mb_convert_encoding($rss->channel['title'],"EUC-JP","auto") . "

\n";
echo "