Question

有一段asp源码，希望能让大家帮忙教教我怎么添加显示信息的条数。现在显示6条。希望显示10条或更过。

<%
set Rs_hot=server.CreateObject("ADODB.RecordSet")
if uselevel=1 then
if Request.cookies(eChsys)("key")="super" or Request.cookies(eChsys)("key")="typemaster" or Request.cookies(eChsys)("key")="bigmaster" or Request.cookies(eChsys)("key")="smallmaster" or Request.cookies(eChsys)("key")="check" then
Rs_hot.Source="select top "& index_top_txt &" * from "& db_EC_News_Table &" where checkked=1 order by click DESC,newsid desc"
end if
if Request.cookies(eChsys)("key")="" then
Rs_hot.Source="select top "& index_top_txt &" * from "& db_EC_News_Table &" where (checkked=1 and newslevel=0) order by click DESC,newsid desc"
end if
if Request.cookies(eChsys)("key")="selfreg" then
if Request.cookies(eChsys)("reglevel")=3 then
Rs_hot.Source="select top "& index_top_txt &" * from "& db_EC_News_Table &" where (checkked=1 ) order by click DESC,newsid desc"
end if
if Request.cookies(eChsys)("reglevel")=2 then
Rs_hot.Source="select top "& index_top_txt &" * from "& db_EC_News_Table &" where (checkked=1 ) order by click DESC,newsid desc"
end if
if Request.cookies(eChsys)("reglevel")=1 then
Rs_hot.Source="select top "& index_top_txt &" * from "& db_EC_News_Table &" where (checkked=1 ) order by click DESC,newsid desc"
end if
end if
else
Rs_hot.Source="select top "& index_top_txt &" * from "& db_EC_News_Table &" where (checkked=1) order by click DESC,newsid desc"
end if
Rs_hot.Open Rs_hot.Source,conn,1,1
Do While Not Rs_hot.Eof
newsurl="E_ReadNews.asp?NewsID=" & rs_hot("NewsID")
newswwwurl=rs_hot("titleface")
fileExt=lcase(getFileExtName(rs_hot("picname")))
%>
能否帮我解释一下这段代码每行大体是什么意思吗？谢谢

Answer 1

Rs_hot.pagesize=10 ‘这个自己定义

Answer 2

index_top_txt 的值为要显示的条数吧，你把这个值定义大些，比如为10

Answer 3

"& index_top_txt &"你这个已经传了动态参数了吧