怎么定义“文章简介的字数”呢?
我折腾了半天,我发用RSS阅读器调用,是不会
用RSS阅读器怎么调用呢?不知道怎么调用,请明示?
还有,怎么定义“文章简介的字数”呢?
源文件里面有说明啊,变量wordnum的值就是字数限制。
使用方法压缩包里面也已经写了
[em07]大家不要下!有严重缺陷!
里面生成的连接统一生成xxx.com/jiaodian/173111872XX.html 这个样子
而我的文件名是生成日期的2006-3/2/202457248XX.html
用在线RSS bloglines 用了一下 一,地址生成错误,不能访问。
二,简介文字里有
nbsp;乱码。
发现修改后的文件有问题,不能调用栏目新闻,只能调用全部新闻;
发现修改后的文件有问题,不能调用栏目新闻,只能调用全部新闻;
有这个问题,谁能解决一下呢?
能不能限制指输出100-200条最新的,这样速度比较快,要是输出整个栏目的话,栏目里面有1万条数据,输出要输出一会了!而且频繁的调用数据库,能不能生成静态的,这样的话不用每次都读取数据库了!
Thanks!!
有问题,我访问不了,我放到我站目录下 http://www.567tour.com/rss.asp
代码修改为:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Inc/Cls_DB.asp"-->
<!--#include file="Inc/Const.asp"-->
<!--#include file="Inc/NoSqlHack.Asp"-->
<%
on error resume next
set DBC=new DatabaseClass
set rss_conn = DBC.openconnection()
wordnum=50 '======定义默认简介内容字数
connstr=""
if len(trim(request.querystring("classEName")))>0 then
className = trim(request.querystring("classEName"))
set whatClass = server.CreateObject("adodb.recordset")
whatClassSQL = "select * from FS_newsClass where ClassEName='"&className&"'"
whatClass.open whatClassSQL,rss_conn
connstr="where ClassID='"&whatClass("ClassID")&"'"
end if
set rs = server.CreateObject("adodb.recordset")
strSQL = "select top 100 * from FS_news " &connstr &"order by id desc"
rs.open strSQL,rss_conn,3,3
set webconfig = server.CreateObject("adodb.recordset")
webSQL = "select * from FS_config"
webconfig.open webSQL,rss_conn
if err.number<> 0 then
response.write "没有找到任何内容"
else
response.contentType="text/xml"
response.write("<?xml version=""1.0"" encoding=""GB2312""?>")
'response.write "<?xml-stylesheet href=""css/rss.css"" type=""text/css""?>"
response.write("<rss version=""2.0"">")
response.write "<channel>"
if len(className)<=0 then
response.write "<title>"&replace(webconfig("SiteName"),"&","")&"</title>"
else
response.write "<title>"&replace(webconfig("SiteName"),"&","")&"["&replace(whatClass("ClassCName"),"&","")&"]</title>"
end if
do while not rs.eof
set newsClass = server.CreateObject("adodb.recordset")
classSQL = "select * from FS_newsClass where classID='"&rs("ClassID")&"'"
newsClass.open classSQL,rss_conn
response.write "<item>"
response.write "<title>" &replace(rs("title"),"&","")&"</title>"
response.write "<description><![CDATA["&left(replace(rs("content"),"&",""),wordnum)&"……"&"]]></description>"
linkStr="<link>" &replace(webconfig("DoMain"),"&","")&replace(newsClass("saveFilePath"),"&","")&"/"&replace(newsClass("ClassEName"),"&","")&"/"&replace(rs("filename"),"&","")&"."&replace(rs("fileextname"),"&","")&"</link>"
if len(trim(request.querystring("useDatePath")))>0 and request.QueryString("useDatePath")="1" then '====判断是否使用日期路径
linkStr="<link>" &replace(webconfig("DoMain"),"&","")&replace(newsClass("saveFilePath"),"&","")&"/"&replace(newsClass("ClassEName"),"&","")&replace(rs("Path"),"&","")&"/"&replace(rs("filename"),"&","")&"."&replace(rs("fileextname"),"&","")&"</link>"
end if
response.write linkStr
response.write "<category>" &replace(newsClass("ClassCName"),"&","")&"</category>"
response.write "<author>" &replace(rs("Author"),"&","")&"</author>"
response.write "<pubDate>"&rs("addDate")&"</pubDate>"
response.write "<comments></comments>"
response.write "</item>"
newsClass.close
set newsClass = nothing
rs.movenext
loop
response.write "</channel>"
response.write("</rss>")
end if
rs.close
set rs=nothing
%>
请指点指点哈!
提供一个简单的修改方法,如下:
把Rss目录下的index.asp文件第71行<link>"&rs("HeadNewsPath")&"</link>改为<link>"&GetConfig(0)& RssClassObj(0)& "/"& RssClassObj(1)&rs("path")&"/"&rs("FileName")&"."&rs("FileExtName")&""&"</link>就是拆分为调用网址+存放目录名+分类名+文件名
实例:http://info.chinaitgi.com/Rss/index.asp?t=n&c=l&id=065300853209230
好
这个补丁没有判断权限,所以存在一定的漏洞。
其中有个大bug,取消审核的帖子,却可以在rss中看到。
建议大家使用时再修改代码。
不知道怎么用