UC知道拿出全部积分向大家求组一段ASP代码
来源：百度知道 编辑：UC知道 时间：2024/06/06 01:12:21
<!-- 以下代码是从blog表得出bname和btime的值 -->
<%
Set rst=server.createobject("ADODB.recordset")
rst.open "select * from blog order by bid desc ",conn,3,3
rst.pagesize=2 '指示recordset中一页所包含的记录数
tatalrecord=rst.recordcount '获取记录总数
tatalpages=rst.pagecount '获取分页的数目 指用pagecount属性可确定recordset对象中数据的页数
rst.movefirst '把指针移到第一条记录上
Page=int(request("page")) ' int是一个函数 让page取整值
If page <=0 then
Page=1
end if
If request("page")="" then
Page=1
end if
Rst.absolutepage=page ' 指定当前记录所在的页
%>
<!-- 以下代码是循环输出 -->
<%
n=1
while not rst.eof and n<=rst.pagesize '不是最后一条记录和不是第一条记录也就是n<=1
%>
<%=rst("bname")%><%=rst("btime")%>
<%
n=n+1
rst.movenext
wend %>
<%
<%
Set rst=server.createobject("ADODB.recordset")
rst.open "select * from blog order by bid desc ",conn,3,3
rst.pagesize=2 '指示recordset中一页所包含的记录数
tatalrecord=rst.recordcount '获取记录总数
tatalpages=rst.pagecount '获取分页的数目 指用pagecount属性可确定recordset对象中数据的页数
rst.movefirst '把指针移到第一条记录上
Page=int(request("page")) ' int是一个函数 让page取整值
If page <=0 then
Page=1
end if
If request("page")="" then
Page=1
end if
Rst.absolutepage=page ' 指定当前记录所在的页
%>
<!-- 以下代码是循环输出 -->
<%
n=1
while not rst.eof and n<=rst.pagesize '不是最后一条记录和不是第一条记录也就是n<=1
%>
<%=rst("bname")%><%=rst("btime")%>
<%
n=n+1
rst.movenext
wend %>
<%
同时再建立一个RES
然后把代拿改下
res.open "select * from reply order by uid desc ",conn,3,3
<!-- 以下代码是循环输出 -->
<%
n=1
while not rst.eof and n<=rst.pagesize and res.eof '不是最后一条记录和不是第一条记录也就是n<=1
%>
<%=rst("bname")%><%=rst("btime")%><%=res("a")%><%=res("b")%>'具体加什么数据你自己来
<%
n=n+1
rst.movenext
res.movenext
wend %>
<%
rst.close()
Set rst=nothing
set res=nothing
%>
把代码更改一下，进行多表联合查询！
rst.open "select uid,bid,bname,btime,（还有其它你要显示的数据的字段名） from blog，reply where blog.bid=reply.uid order by bid desc ",conn,3,3即可！