ASP之Javascript分页程序
June 22, 2010 | tags | views
Comments 0
花了半个小时写了个ASP（使用javascript作为脚本）的分页程序。贴出来共享：
主程序：
<%@ language="Javascript"%>
<!--#include file="initialize/function.asp"-->
<%
var myconn=Server.Createobject("ADODB.connection");
myconn.open ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+Server.MapPath('student.mdb'));
var rs=Server.Createobject("ADODB.recordset");
var sql="select * from j_student_info";
rs.open(sql,myconn,1,1)
var page=Request.QueryString("page");
if (page+""=="undefined") page=1;
if (page<0) page=1;
rs.pagesize=1;
rs.absolutepage=parseInt(page);
count=rs.pagecount;
for (i=1;i<=rs.pagesize;i++){
if (rs.eof) break;
Response.write (rs("name")+" "+rs("sex")+" "+rs("phone")+" "+rs("address")+" "+rs("adddate")+"<br>");
rs.movenext;
}
Page(count,page,"<a href=\"asp.asp?page=");
rs.close();
rs=null;
myconn.close();
myconn=null;
包含函数部分：
<%
function Page(count,page,link){
if (count>1){
if (page<=5) {
if (count<=10){
for (i=1;i<=count;i++){
if (i==page){
Response.write (i+" ");
}else{
Response.write (link+i+"\">"+i+"</a>"+" ");
}
}
}else{
for (i=1;i<=10;i++){
if (i==page){
Response.write (i+" ");
}else{
Response.write (link+i+"\">"+i+"</a>"+" ");
}
}
}
}
if (page>5 && page<=(count-5)){
for (i=(page-5);i<=(parseInt(page)+5);i++){
if (i==page){
Response.write (i+" ");
}else{
Response.write (link+i+"\">"+i+"</a>"+" ");
}
}
}
if (page>(count-5)){
for (i=(count-10);i<=count;i++){
if (i==page){
Response.write (i+" ");
}else{
Response.write (link+i+"\">"+i+"</a>"+" ");
}
}
}
}
}
%>