给网站添加RSS订阅_h5网页加入rss-CSDN博客

本文链接：https://blog.csdn.net/suleil1/article/details/49471143

RSS是在线共享内容的一种简易方式，也叫聚合内容（Really Simple Syndication）。通常在时效性比较强的内容上使用RSS订阅能更快速获取信息，网站提供RSS输出，有利于让用户获取网站内容的最新更新。网络用户可以在客户端借助于支持RSS的聚合工具软件，在不打开网站内容页面的情况下阅读支持RSS输出的网站内容。
    那么网站怎么输出RSS呢？
    首先应该知道的是，RSS订阅实际上是XML文件，里面是有相关格式的XML内容。
    因此我们可以使用FSO方法来生成这个文件。
    ASP代码如下：

------------------------------分割线：以下为代码------------------------------------


<%
'设定显示HTML格式
function dvHTMLCode(byval fString)
if isnull(fString) or trim(fString)="" then
dvHTMLCode=""
exit function
end if
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, " "," ")
fString = Replace(fString, """, CHR(34))
fString = Replace(fString, "'", CHR(39))
fString = Replace(fString, "</P><P> ",CHR(10) & CHR(10))
fString = Replace(fString, "<BR> ", CHR(10))
fString = Replace(fString, CHR(10),"<BR> ")
dvHTMLCode = fString
end function

filename="RSS.xml"
'RSS.XML即为RSS订阅内容，需要将位置和文件预先建立。
set fso = Server.CreateObject("Scripting.FileSystemObject")
set xml = fso.CreateTextFile(server.mappath(filename))
xml.writeline "<?xml version=""1.0"" encoding=""gb2312"" ?>"
xml.writeline "<rss version=""2.0"">"
xml.writeline "<channel>"
xml.writeline "<title>这里填写网站名称</title>"
xml.writeline "<link>这里填写网站地址</link>"
xml.writeline "<language>zh-cn</language>"
xml.writeline "<copyright>RSS Feed For 网站名称</copyright>"
'版权说明
Set rs = CreateObject("ADODB.RecordSet")
sql = "select top 10 * from [需要生成RSS订阅的数据表] order by id desc"
'从数据表中选择最新10个
rs.open sql,conn,1,1
For i = 1 To 10
xml.writeline "<item>"
xml.writeline "<title><![CDATA["&rs("title")&"]]></title>"
'字段title为订阅信息标题
xml.writeline "<link>/news/shownews.asp?id="&rs("id")&"</link>"
'链接指向地址，和前面的网站地址拼接起来要求能正常访问
xml.writeline "<description><![CDATA["&dvHTMLCode(rs("content"))&"]]></description>"
'字段content为订阅信息内容，此处格式化
xml.writeline "<pubDate>"&rs("addtime")& "</pubDate>"
'字段addtime为订阅信息发布时间
xml.writeline "</item>"
Next
xml.writeline "</channel>"
xml.writeline "</rss>"
xml.close
rs.close
Set rs = Nothing
conn.close
Set conn = Nothing
response.write "完成"
%>
------------------------------分割线：以上为代码------------------------------------
以上代码生成RSS.XML文件已经按照格式化，除红褐色部分基本不需要修改。另，绿色部分为注释。

    这样就可以生成RSS.XML文件。光有了XML文件还不行，还得在页面上的<head></head>标记对当中加上一行代码：
    <link rel="alternate" type="application/rss+xml" title="网站名称" href="rss.xml" />
    RSS.XML文件自己指定。这样浏览器才能知道你的网站上提供RSS订阅。

然后最好能在页面显眼位置添加上RSS订阅图标，方便用户直接订阅。