繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp 动态生成rss(不成生xml文件)代码
- ASP
- 从文本文件中读取信息并存储入数据库
- 文本搜索
- FileSystemObject处理文件
- 设计 FileSystemObject
- 处理驱动器和文件夹
- 用ASP做一个TOP COOL的站内搜索
- 怎样读取一个文本文件的内容?
- 在线用表单建立文件夹
- filesystemobject组件的用法示例
- ASP中文本文件与数据库文件的数据交换(FSO)
- 读取目录下的所有文件(包括子目录下的所有文件)
- ASP中FSO的神奇功能 - FSO不能做到的
- ASP中FSO的神奇功能 - 用FSO进行内容管理
- ASP中FSO的神奇功能 - 使用FSO进行搜索
- ASP中FSO的神奇功能 - 权限许可
- ASP中FSO的神奇功能 - 文件读取
- ASP中FSO的神奇功能 - 写文件
- ASP中FSO的神奇功能 - 简介
- 读取目录下的文件得到一个数组
- 奇妙的文件系统对象组件
ASP 中的 asp 动态生成rss(不成生xml文件)代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 94 ::
收藏到网摘: n/a
为你的网站添加rss阅读功能 把以下文件保存为 rss.asp 放在网站的根目录下 修改里面的几个参数就可以 rss的优点
1.您可以有选择地浏览您感兴趣的以及与您的工作相关的新闻。
2.您可以把需要的信息从不需要的信息（兜售信息，垃圾邮件等）中分离出来。
3.您可以创建自己的新闻频道，并将之发布到因特网。
什么是 RSS？
RSS 指 Really Simple Syndication（真正简易联合）
RSS 使您有能力聚合（syndicate）网站的内容
RSS 定义了非常简单的方法来共享和查看标题和内容
RSS 文件可被自动更新
RSS 允许为不同的网站进行视图的个性化
RSS 使用 XML 编写
RSS 是一种使用 XML 向许多其他的网站分发某个网站上的网络内容的方法。
RSS 使我们有能力对新闻和更新进行快速浏览。
为什么使用 RSS？
RSS 被设计用来展示选定的数据。
如果没有 RSS，用户就不得不每日都来您的网站检查新的内容。对许多用户来说这样太费时了。通过 RSS feed（RSS 通常被称为 News feed 或 RSS feed），用户们可以使用 RSS 聚合器来更快地检查您的网站更新（RSS 聚合器是用来聚集并分类 RSS feed 的网站或软件）。
由于 RSS 数据很小巧并可快速加载，它可轻易地被类似移动电话或 PDA 的服务使用。
拥有相似内容的网站环（Web-rings）可以轻易地在它们的网站共享内容，使这些网站更出色更有价值。
RSS 的未来
RSS 会无所不在！
成千上万的网站在使用 RSS，每天都有越来越多的人们认识到它的用处。
通过 RSS，因特网上的信息会更易查找，而网站开发者也可更容易地把他们的内容传播到特定的受众。
了解了这么多下面让我们一起来体验RSS吧!
为你的网站添加rss阅读功能
把以下文件保存为 rss.asp 放在网站的根目录下 修改里面的几个参数就可以
程序代码
复制代码 代码如下:
<!-- #include file="conn.asp" -->
<%
sXmlClear = "<?xml version='1.0' encoding='gb2312'?>"
Response.CharSet="gb2312" '数据集编码
Response.ContentType="text/xml" '数据流格式定义
%>
<%=sXmlClear%>
<rss version="2.0">
<channel>
<title><![CDATA[乡下人'blog]]></title>
<link>http://xxrblog.cn/</link>
<description><![CDATA[网站副标题或是网站简介]]></description>
<language>zh-CN</language>
<copyright>
<![CDATA[ Copyright 2005 PBlog2 v2.4 ]]>
</copyright>
<webMaster>
< ]]>
</webMaster>
<generator>PBlog2 v2.5</generator>
<image>
<title>乡下人'blog xxrblog.cn</title>
<url>http://www.xxrblog.cn/images/logos.gif</url>
<link>http://www.xxrblog.cn/</link>
<description>乡下人'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>
评论 (0) All
