原创ASP打造图书管理系统(access版)(三)
这次咱们来讲主要显示全部数据的页面
下图为分页代码
好了我来讲解一下上面的代码
set rs=server.createobject("adodb.recordset")
sql="select * from xhbook order by id desc"
rs.open sql,db,1,1
为声明记录集用SQL输出所有XHBOOK记录
rs.pagesize=10
让每页面显示10条记录
pagecount1=rs.pagecount
把总页数赋值给pagecount1
if request.querystring("pagenum")=0 or request.querystring("pagenum")="" then
pagenum=1
else
pagenum=request.querystring("pagenum")
rs.absolutepage=trim(request.querystring("pagenum"))
end if
以上代码是判断页面的参数,如果是零或者空值就赋值1
rs.absolutepage=trim(request.querystring("pagenum"))
赋值给当前页面的数值!
还有一点重要的要讲解的分页就是在循环输出的时候,代码如下:
<%do while not rs.eof and i<=10%>
<tr align="center">
<td height="26"><%=rs("bookname")%></td>
<td height="26"><%=rs("booktype")%></td>
<td height="26"><%=rs("publishing")%></td>
<td height="26"><font color="#FF0000"><%=rs("bookmoney")%>元</font></td>
<td height="26"><%=rs("xhdate")%></td>
</tr>
<%
i=i+1
rs.movenext
loop
%>
必须声明一个变量I,这样才能保证循环次数!大家应该可以看明白吧~
这段代码就是分页了,赋值给首页的数值是1,尾页的数值就是原来赋值的PAGECOUNT1
剩下的就是上页和下页了,我做了判断,看是否给予连接代码中大家可以看到
<%if pagenum>1 then%>
<a href=xh_qlook.asp?pagenum=<%=(pagenum-1)%>>上一页</a>
<%else%>
上一页
<%end if%>
<%if pagenum < trim(pagecount1) then%>
<a href=xh_qlook.asp?pagenum=<%=(pagenum+1)%>>下一页</a>
<%else%>
下一页
<%end if%>
上页就用当前值-1,如果下页就+1,主要是通过querystring传递的~!
好了开始讲解添加新分类页面xh_add.asp,其实这个页面就是添加新分类页面!就是一个递交页面~大家看看页面代码一下就明白了~~!
好了准备下节课了~