求助!怎样在asp中调用一个分类。

2025-03-03 06:07:53
推荐回答(3个)
回答1:













<%
dim classname
classname="您想要的分类名称"

'page=clng(request("page")) '这个不需要了 10条不用分页
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select top 10 * from NEWS where bigclassname='"&classname&"' order by bh desc"
rs.Open sql,conn,1,1
if rs.eof and rs.bof then
response.Write("没有记录")
else
'rs.PageSize=10 '这个不需要了 10条不用分页
'if page=0 then page=1 '这个不需要了 10条不用分页
'pages=rs.pagecount '这个不需要了 10条不用分页
'if page > pages then page=pages '这个不需要了 10条不用分页
'rs.AbsolutePage=page '这个不需要了 10条不用分页

for j=1 to 10

%>





<%
rs.movenext
if rs.eof then exit for
next
%>

新闻详细信息列表
编号
新闻标题
所属分类
发布日期
操作
<%=rs("bh")%>
<%=rs("BigClassName")%>
<%=rs("time")%>

回答2:

top 10。这个可实现前10条,不过,你要做好数据库的判断,如果不够10条时,可能会出错的。

比如:
select top 10 * from news order by bh desc

如果要查找一个分类,或是有更多组合条件查寻的话,如下:
sql = "select top 10 * from news where 1=1"
if fenlei<>"" then sql = sql&" and fenlei="&fenlei&"'"
'if 条件<> "" then sql = sql&" and 字段="&变量&"'"
...
sql = sql&" order by bh desc"
这样,可实现自动判断条件来组合SQL语句,实现多条件查询SQL语句

回答3:

yj fa le nikan kanduima