feed.asp

本代码是一个个人主页

<!--#include file="conn.asp"-->
<!--#include file="common.asp"-->
<!--#include file="include/function.asp"-->
<!--#include file="include/ubbcode.asp"-->
<%
Response.Charset = "UTF-8"
Response.ContentType="text/xml"
Response.Expires=60
Response.Write("<?xml version=""1.0"" encoding=""UTF-8""?>")
id=request("id")
CheckBadStr(id)
  set rsall=server.createobject("adodb.recordset")
  sql="select * from blog_basic where id=1"
  rsall.open sql,db
  str=rsall("basic_blogname")
  'str=replacestr2(str)
  str2=rsall("basic_bloginfo")
  'str2=replacestr2(str2)
  basic_skin=rsall("basic_skin")
  basic_blogindex=rsall("basic_blogindex")
  basic_blogname=rsall("basic_blogname")
  basic_indexface=rsall("basic_indexface")
  basic_blogpage=rsall("basic_blogpage")
  basic_mastername=rsall("basic_mastername")
  basic_masteremail=rsall("basic_masteremail")
  rsall.close
  set rsall=nothing

if id="" then
%>
<rss version="2.0">
  <channel>
  <title><%=basic_blogname%></title>
  <link><%=basic_blogindex%></link>
  <description><%=basic_blogname%></description>
  <language>zh-cn</language>
  <copyright><![CDATA[Copyright 2005 F-BLOG v1.0]]></copyright>
  <webMaster><![CDATA[<%=basic_masteremail%>(<%=basic_mastername%>)]]></webMaster>
  <generator>F-BLOG v1.0</generator> 
  <image>
	<title><%=basic_blogname%></title> 
	<url><%=basic_blogindex%>images/logos.gif</url> 
	<link><%=basic_blogindex%></link> 
	<description><%=basic_blogname%></description> 
  </image>
<%
  set rs=server.createobject("adodb.recordset")
  sql="select * from blog_content order by id desc"
  rs.open sql,db,1,3
  do while not rs.eof
%>
<item>
  <link><%=basic_blogindex&"readblog.asp?id="&rs("id")%></link>
  <title><![CDATA[<%=rs("content_title")%>]]></title>
  <author><%=basic_masteremail%>(<%=rs("content_author")%>)</author>
  <category><![CDATA[<%=rs("content_cf")%>]]></category>
  <pubDate><%=rs("content_date")%></pubDate>
  <guid><%=basic_blogindex&"readblog.asp?id="&rs("id")%></guid>
  <description><![CDATA[<%=ubbhtml(rs("content_content"))%>]]></description>
  </item>
<%
  rs.movenext
  loop
  rs.close
  set rs=nothing
%>
</channel>
</rss>
<%
Else
  set rs=server.createobject("adodb.recordset")
  sql="select * from blog_content where content_groupid="&id
  rs.open sql,db,1,3
  if not rs.eof Then
  set rs2=server.createobject("adodb.recordset")
  sql="select class_name from blog_class where id="&id
  rs2.open sql,db
  class_name=rs2("class_name")
  rs2.close
  set rs2=nothing
%>
  <rss version="2.0">
  <channel>
  <title><%=basic_blogname%>-<%=class_name%></title>
  <link><%=basic_blogindex%></link>
  <description><%=basic_blogname%></description>
  <language>zh-cn</language>
  <copyright><![CDATA[Copyright 2005 F-BLOG v1.0]]></copyright>
  <webMaster><![CDATA[<%=basic_masteremail%>(<%=basic_mastername%>)]]></webMaster>
  <generator>F-BLOG v1.0</generator> 
  <image>
	<title><%=basic_blogname%></title> 
	<url><%=basic_blogindex%>images/logos.gif</url> 
	<link><%=basic_blogindex%></link> 
	<description><%=basic_blogname%>-<%=class_name%></description> 
  </image>
<%
  do while not rs.eof
%>
  <item>
  <link><%=basic_blogindex&"readblog.asp?id="&rs("id")%></link>
  <title><![CDATA[<%=rs("content_title")%>]]></title>
  <author><%=basic_masteremail%>(<%=rs("content_author")%>)</author>
  <category><![CDATA[<%=rs("content_cf")%>]]></category>
  <pubDate><%=rs("content_date")%></pubDate>
  <guid><%=basic_blogindex&"readblog.asp?id="&rs("id")%></guid>
  <description><![CDATA[<%=ubbhtml(rs("content_content"))%>]]></description>
  </item>
<%
  rs.movenext
  loop
  rs.close
  set rs=Nothing
  Else
    response.write reinfo("鍑洪敊浜