我的access数据库查询结果需要分页显示,但是执行结果没有显示,请教高手如何实现,谢谢!!
<!--#include file= "conn.asp "-->
<% jino=trim(request.form( "jino "))
teachername=trim(request.form( "teachername "))
exec= "select * from 课程 where jino= ' "+jino+ " ' and teachername= ' "+teachername+ " ' "
set rs=server.createobject( "adodb.recordset ")
rs.open exec,conn,1,1
if rs.eof then
response.write "请重新查询 "
response.end
end if
rs.PageSize=10 '##设置一个页码里面显示的记录数
pagecount=rs.PageCount '##pagecount是记录的个数
page=int(request.QueryString ( "page "))
if page <=0 then page=1
if request.QueryString( "page ")= " " then '##当前页为 page页
page=1
end if
rs.AbsolutePage=page
%>
<html>
<head>
<title> 查询结果 </title>
<meta http-equiv= "Content-Type " content= "text/html; charset=gb2312 ">
<script language= "JavaScript ">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName== "Netscape ")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW ¦ ¦ innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
</head>
<body background= "images/bg1.jpg " bgcolor= "#FFFFFF " text= "#000000 " >
<div align= "center ">
<p> <font color= "#660033 "> <font size= "4 " color=