asp生成rss代码 加rss标签说明

一份RSS文件的基本架構如下：

 

<rss version="2.0">
 <channel>
  <title>文件抬頭</title>
  <link>文件網址</link>
  <description>文件簡介</description>
  <language>zh-tw（文件語言，zh-tw是台灣的傳統中文）</language>
  <lastBuildDate>Sat, 26 Nov 2005 11:40:19 GMT（建立時間）</lastBuildDate>
  

  <item>
   <title>項目標題</title>
   <link>項目連結</link>
   <pubDate>項目更新日期</pubDate>
  </item>

  <item>
   <title>項目標題</title>
   <link>項目連結</link>
   <pubDate>項目更新日期</pubDate>
  </item>
...
 </channel>
</rss>

  

 

 

dim sCrLf, sXmlClear, sRssHead, sRssEnd
 
   sCrLf = chr(13) & chr(10)  '回车+换行

  sXmlClear = "<?xml version='1.0' encoding='gb2312'?>" & sCrLf 
  sRssHead = "<rss version='2.0'>" & sCrLf
  sRssHead = sRssHead & "<channel>" & sCrLf
  sRssHead = sRssHead & "<title>"&webname& "</title>" & sCrLf 
  sRssHead = sRssHead & "<description> <![CDATA["&shuoming&" ]]></description>" & sCrLf
  sRssHead = sRssHead & "<link>"&webdomain&"</link>" & sCrLf
  sRssHead = sRssHead & "<language>zh-cn</language>" & sCrLf
  sRssHead = sRssHead & "<docs>"&webname&"</docs>" & sCrLf
  sRssHead = sRssHead & "<generator>"&webdomain&" "&webname&"</generator>" & sCrLf 
   sRssEnd = "</channel></rss>"  
     Response.CharSet="gb2312"  '数据集
  Response.ContentType="text/xml"  '数据流格式定义

  '输出：
  Response.write sXmlClear
  Response.write sRssHead   
'------------------------------------------------------------------
 
 set rs=server.CreateObject("adodb.recordset")
 sql="select * from Hotel   order by id asc"
 rs.open sql,conn,1,1
'------------------------------------------------------------------
 '--------如果没有找到的话,返回0
 '--------如果找到的话,返回所有匹配的项目
 if not (rs.eof and rs.bof) then
 
 
  do while not rs.eof
    
     response.write "<item>" & sCrLf
        response.write "<title> " & replace(rs("h_name"),"&","＆") & " </title>" & sCrLf
        response.write "<link> " &webdomain& "/hotel-"&replace(rs("h_name2")," ","-")&"-"&rs("id")&".html </link>" & sCrLf
        response.write "<h_zone> " & rs("h_zone") & " </h_zone>" & sCrLf
        response.write "<description><![CDATA[ " &left(replace(RemoveHTML(rs("h_content")),"&nbsp;",""),200)& " ]]> </description>"& sCrLf
        response.write "</item>" & sCrLf & sCrLf 
   rs.movenext
  loop
 
 end if
 rs.close
 
 
  sql="select * from message   order by id asc"
 rs.open sql,conn,1,1
'------------------------------------------------------------------
 '--------如果没有找到的话,返回0
 '--------如果找到的话,返回所有匹配的项目
 if not (rs.eof and rs.bof) then
 

   'response.Write("<ul id='sug'>")
  do while not rs.eof
    
     response.write "<item>" & sCrLf
        response.write "<title> " & replace(rs("title"),"&","＆") & " </title>" & sCrLf
        response.write "<link> " &webdomain& "/a_main.asp?id="&rs("id") & " </link>" & sCrLf
        response.write "<description><![CDATA[ " &left(replace(RemoveHTML(rs("content")),"&nbsp;",""),200)& " ]]> </description>"& sCrLf
        response.write "<pubDate> " & rs("time") & " </pubDate>" & sCrLf
        response.write "</item>" & sCrLf & sCrLf 
   rs.movenext
  loop

   'response.Write("</ul>")
 end if
 rs.close
 set rs=nothing
 

  Response.write sRssEnd 

 

下面是一个Rss文件（*.xml）,里面的注释是自己加的，<!-- 和-->之间为注释。
<?xml version="1.0" encoding="utf-8" ?> 
<!-- 声明当前文件为xml文档【必】
  --> 
<rss version="2.0">
<!-- 声明当前文件内容为rss格式文件,属性version（必须）指定当前rss版本【必】
  --> 
<channel>
<!-- 固有节点【必】
  --> 
  <title>新闻中心-国内焦点新闻</title> 
<!-- 对网站和当前RSS 文件的简短描述【必】
  --> 
<image>
<!-- 为当前RSS添加图片
  --> 
  <title>新闻中心-国内焦点</title> 
<!-- 图片标题对图片的简单描述
  --> 
  <link>http://news.sina.com.cn/china</link> 
<!-- 网站链接地址
  --> 
  <url>http://image2.sina.com.cn/dy/gn/in10.jpg</url> 
<!-- 图片的链接地址
  --> 
  </image>
  <description>国内焦点新闻列表</description> 
-<!-- 对当前RSS文件的描述【必】
  --> 
  <link>http://news.sina.com.cn/china/index.shtml</link> 
<!-- 网站主页链接【必】
  --> 
  <language>zh-cn</language> 
<!-- 当前RSS使用的语言
  --> 
  <generator>WWW.SINA.COM.CN</generator> 
<!-- 当RSS文件为自动创建时多存在此节点（RSS文件由什么创建）
  --> 
  <ttl>5</ttl> 
<!-- (ttl = time to live) 在刷新前当前RSS在cache中可以保存多长时间（分钟）
  --> 
  <copyright>Copyright 1996 - 2005 SINA Inc. All Rights Reserved</copyright> 
<!-- 声明版权
  --> 
  <pubDate>Wed, 26 Apr 2006 01:45:05 GMT</pubDate> 
<!-- 当前RSS最后发布的时间
  --> 
  <category /> 
<!-- 声明当前RSS内容的种类
  --> 
<item>
<!-- 一条信息
  --> 
  <title>最高检：严惩公务员利用审批等权力索贿受贿</title> 
<!-- 新闻标题【必】
  --> 
  <link>http://news.sina.com.cn/c/l/2006-04-26/08029720281.shtml</link> 
<!-- 新闻链接【必】
  --> 
  <author>WWW.SINA.COM.CN</author> 
<!-- 新闻作者
  --> 
  <guid>http://news.sina.com.cn/c/l/2006-04-26/08029720281.shtml</guid> 
<!-- guid>GUID=Globally Unique Identifier 为当前新闻指定一个全球唯一标示
  --> 
  <category>国内焦点新闻</category> 
<!-- 新闻种类
  --> 
  <pubDate>Wed, 26 Apr 2006 00:02:53 GMT</pubDate> 
<!-- 新闻最后发布时间
  --> 
  <comments /> 
<!-- 新闻注释
  --> 
  <description>  最高人民检察院常务副检察长张耕说，对于国家公务员在商业活动中利用职权谋取非法利益、索贿受贿的案件，必须发现一起，坚决查处一起。特别是对国家公务员利用行政审批权、行政执法权和司法权执法犯法、贪赃枉法、索贿受贿，构成犯....</description> 
<!-- 新闻的简单描述【必】
  --> 
  </item>
 </channel>
 </rss>

第一行 声明当前文件是xml文档
第二行声明当前文件内容为rss格式文件，属性version（必须）指定当前rss版本为2.0
 <channel>节点为Rss文档的固有节点，必须，无属性。
<item> 节点中即纪录了当前RSS Feed中要显示的内容。一个RSS文件中通常包含多个<item>节点
<channel>节点
必须节点
<title> 对网站和当前RSS 文件的简短描述
<link>  网站主页链接
<description> 对当前RSS文件的描述
可选节点
<image>  为当前RSS添加图片
<language> 当前RSS使用的语言
<generator>当RSS文件为自动创建时多存在此节点（RSS文件由什么创建）
<ttl>(ttl = time to live) 在刷新前当前RSS在cache中可以保存多长时间（分钟）
<copyright>声明版权
<pubDate> 当前RSS最后发布的时间
<category>声明当前RSS内容的种类
 等等
<item>节点
<item>  纪录一条信息（新闻），只包含这条新闻的简单信息，一个RSS文件中包含几条新闻就会有几个<item>
必须节点
<title> 新闻标题
 <link>  新闻链接
<description>  新闻的简单描述
可选节点
<author> 当前新闻的作者
<guid>GUID=Globally Unique Identifier 为当前新闻指定一个全球唯一标示
<category>当前新闻的类别
<pubDate>当前新闻的最后发布时间
<comments>当前新闻的注释