分页出了问题,不知道怎么回事?
<!--#include file="conn.asp"--><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.
<html>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="images/css.css" type=text/css rel=stylesheet>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>编辑课程信息</title>
</head>
<body vLink=#000000 bgColor=#cad7f7>
<table width="655" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#ffffff">
<tr>
<td width="655" height="30">
<table width="654" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="17" colspan="2"> </td>
</tr>
<tr>
<td width="82" height="30"> </td>
<td width="572"> </td>
</tr>
</table></td>
</tr>
<tr>
<td height="30"><table width="653" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60" height="32">
<div align="center">学号 </div>
</td>
<td width="65" height="32"><div align="center">姓名</div></td>
<td width="46" height="32"><div align="center">年龄</div></td>
<td width="41" height="32"><div align="center">性别</div></td>
<td width="80" height="32"><div align="center">进校时间</div></td>
<td width="94" height="32"><div align="center">籍贯</div></td>
<td width="159"><div align="center">专业</div></td>
</tr>
<%
set rs=server.CreateObject("ADODB.Recordset")
rs.open "select student_number,student_name,age,sex,in_time,homeplace,major from Student",conn ,1,3
if rs.eof and rs.bof then
response.Write"目前没有学生信息"
else
counts=10
rs.pagesize=counts
allpages=rs.pageCount
page=request("page")
if not isNumeric(page) then page=1
if isEmpty(page) or Cint(page)<1 then
page=1
else if Cint(page)>=allPages then
page=allPages
end if
rs.AbsolutePage=page
Do while(Not rs.eof) and counts>0
%>
<tr>
<td height="25"><%=rs("student_number")%></td>
<td width="65" height="25"><%=rs("student_name")%></td>
<td><%=rs("age")%></td>
<td><%=rs("sex")%></td>
<td><%=rs("in_time")%></td>
<td><%=rs("homeplace")%></td>
<td><%=rs("major")%></td>
</tr>
<%
counts=counts-1
rs.movenext
if rs.eof then exit do
loop
end if
%>
</table></td>
</tr>
</table>
<table width="653" border="0" cellpadding="0" cellspacing="0" bgcolor="#ffffff">
<tr>
<td height="30" align="center">
<%
response.Write"<br> 当前共有"&rs.recordcount&"条用户记录"
if page=1 then
response.Write"<font color=darkgray> 首页 前页</font>"
else
response.Write"<a href=pagesview.asp?page=1>首页</a> <a href=pagesview.asp?page="&page-1&"> 前页</a>"
end if
if page=allPages then
response.Write"<font color=darkgray>下页 末页</font>"
else
response.Write"<a href=pagesview.asp?page="&page+1&">下页</a> <a href=pagesview.asp?page="&allPages&">末页</a>"
end if
response.Write" 第"&page&"页 共"&allPages&"页 "
end if
%>
</td>
</tr>
</table>
</body>
</html>
页面不显示学生信息,只显示工业多少条信息,不知道是什么地方出错了,就是个分页结构.谢谢
