快捷導(dǎo)航

asp 動態(tài)生成rss(不成生xml文件)代碼

更新時間：2008年12月29日 20:48:45 作者：

為你的網(wǎng)站添加rss閱讀功能把以下文件保存為 rss.asp 放在網(wǎng)站的根目錄下修改里面的幾個參數(shù)就可以

rss的優(yōu)點(diǎn)
1.您可以有選擇地瀏覽您感興趣的以及與您的工作相關(guān)的新聞。
2.您可以把需要的信息從不需要的信息（兜售信息，垃圾郵件等）中分離出來。
3.您可以創(chuàng)建自己的新聞頻道，并將之發(fā)布到因特網(wǎng)。
什么是 RSS？
RSS 指 Really Simple Syndication（真正簡易聯(lián)合）
RSS 使您有能力聚合（syndicate）網(wǎng)站的內(nèi)容
RSS 定義了非常簡單的方法來共享和查看標(biāo)題和內(nèi)容
RSS 文件可被自動更新
RSS 允許為不同的網(wǎng)站進(jìn)行視圖的個性化
RSS 使用 XML 編寫
RSS 是一種使用 XML 向許多其他的網(wǎng)站分發(fā)某個網(wǎng)站上的網(wǎng)絡(luò)內(nèi)容的方法。
RSS 使我們有能力對新聞和更新進(jìn)行快速瀏覽。
為什么使用 RSS？
RSS 被設(shè)計(jì)用來展示選定的數(shù)據(jù)。
如果沒有 RSS，用戶就不得不每日都來您的網(wǎng)站檢查新的內(nèi)容。對許多用戶來說這樣太費(fèi)時了。通過 RSS feed（RSS 通常被稱為 News feed 或 RSS feed），用戶們可以使用 RSS 聚合器來更快地檢查您的網(wǎng)站更新（RSS 聚合器是用來聚集并分類 RSS feed 的網(wǎng)站或軟件）。
由于 RSS 數(shù)據(jù)很小巧并可快速加載，它可輕易地被類似移動電話或 PDA 的服務(wù)使用。
擁有相似內(nèi)容的網(wǎng)站環(huán)（Web-rings）可以輕易地在它們的網(wǎng)站共享內(nèi)容，使這些網(wǎng)站更出色更有價值。
RSS 的未來
RSS 會無所不在！
成千上萬的網(wǎng)站在使用 RSS，每天都有越來越多的人們認(rèn)識到它的用處。
通過 RSS，因特網(wǎng)上的信息會更易查找，而網(wǎng)站開發(fā)者也可更容易地把他們的內(nèi)容傳播到特定的受眾。
了解了這么多下面讓我們一起來體驗(yàn)RSS吧!
為你的網(wǎng)站添加rss閱讀功能
把以下文件保存為 rss.asp 放在網(wǎng)站的根目錄下修改里面的幾個參數(shù)就可以
程序代碼

復(fù)制代碼代碼如下:

<!-- #include file="conn.asp" --> 
<% 
sXmlClear = "<?xml version='1.0' encoding='gb2312'?>" 
Response.CharSet="gb2312" '數(shù)據(jù)集編碼 
Response.ContentType="text/xml" '數(shù)據(jù)流格式定義 
%> 
<%=sXmlClear%> 
<rss version="2.0"> 
<channel> 
<title><![CDATA[鄉(xiāng)下人'blog]]></title> 
<link>http://xxrblog.cn/</link> 
<description><![CDATA[網(wǎng)站副標(biāo)題或是網(wǎng)站簡介]]></description> 
<language>zh-CN</language> 
<copyright> 
<![CDATA[ Copyright 2005 PBlog2 v2.4 ]]> 
</copyright> 
<webMaster> 
<![CDATA[ 24525533@163.com(李永亮) ]]> 
</webMaster> 
<generator>PBlog2 v2.5</generator> 
<image> 
<title>鄉(xiāng)下人'blog xxrblog.cn</title> 
<url>http://www.xxrblog.cn/images/logos.gif</url> 
<link>http://www.xxrblog.cn/</link> 
<description>鄉(xiāng)下人'blog xxrblog.cn</description> 
</image> 
<% 
Set rs = Server.CreateObject("ADODB.Recordset") 
sql="select top 10 * from News order by id desc" 
rs.open sql,conn,3,3 
do while not rs.eof 
Content=rs("Content") 
if Len(Contact)>150 then 
Content=left(Content,147) & "..." 
end if 
%> 
<item> 
<title><%=rs("Title")%></title> 
<description><![CDATA[<%=Content%>]]></description> 
<link>http://xxrblog.cn/article.asp?id=<%=rs("id")%></link> 
<author>作者</author> 
<pubDate><%=rs("Time")%></pubDate> 
</item> 
<% 
rs.movenext() 
loop 
rs.close() 
Set rs = Nothing 
conn.close 
%> 
</channel> 
</rss> 