ASP ajax分页教程一

　　为什么我写ASP分页教程要提到AJAX呢,因为我们要多练习一下编程过程中,结构化的重要性.
再加上很多朋友对分页感到很高深,所以一直都不敢去碰他,要么就用别人写好的组件,要么就是改改别人的东西.特别是我深有感触,假如要快速开发一个项目,我想.net是一个非常优秀的平台.但是,因为他的严重控件化,反而是新手接触不到编程的思想,完全找不到编程的感觉,仿佛就象在搭积木.有时候还是要练习一下底层一点的东西,这样个人的技术能力才会得到提高.我可不想做只会用.NET的组装工人.
好了,下面给出ASP分页的源代码给大家,都进行了详细的注释,一般都可以看的懂.
因为这个是教程一,所以就从最简单的开始,我直接使用的AbsolutePage来定义当前页面,所以没有用诸如MoveFirst这种比较复杂的游标方式,而且分页也是用的下拉选择框,等下个教程我再写一下进阶分页方法,给出前进十页,后退十页,只显示目前所在的十页分组的方法.
ASP虽然是一个过时的东西,不过因为他可以使用JS来写,所以我感觉要做一个项目DEMO的时候,使用ASP要比.NET或者JAVA更方便,因为他不用安装体积庞大的环境.简简单单配置一下就可以了.真要大规模项目开发的话,我肯定还是会用.NET或JAVA的,因为这样就会涉及到效率问题了.
复制代码 代码如下:
<%@LANGUAGE=JAVASCRIPT CODEPAGE=936%>
<%
//定义数据库连接语句
var connstring = Provider=Microsoft.Jet.OLEDB.4.0;Data Source=
+Server.MapPath(database/vote.mdb);
//建立一个rs数据库查询
var rs = Server.CreateObject(ADODB.Recordset)
//rs连接方式
rs.ActiveConnection = connstring
//rs查询语句（按照用户提交时间倒序查询）
rs.Source = select * from users order by usetime DESC
//定义数据库查询模式
rs.CursorType = 3
rs.CursorLocation = 3
rs.LockType = 1
//定义每页显示数据数量
rs.PageSize = 10
//打开数据库连接
rs.Open()
//定义数据库纪录总数，分页总数，URL路径
var counts,pagecos,thisUrl
counts = rs.RecordCount
pagecos = rs.PageCount
thisUrl = Request.ServerVariables(URL)
//如果游标在表中就执行
if(!rs.EOF !rs.BOF){
//如果url的page参数不为空就执行
//定义默认链接字符串，第一页，尾页，上页，下页
//URL的page值（指定的当前页），当前页，当前每页显示数据数量
var defaltStr,firstpage,lastpage,prepage,nextpage,pages,nowPage,nowSize
defaltStr = <a href=+thisUrl+?page=
firstpage = defaltStr+1>首页</a>
lastpage = defaltStr+pagecos+>尾页</a>
pages = Request(page)
//如果处于第一页
//首页，上一页不为链接
if(pages <= 1){
rs.AbsolutePage = 1;
firstpage = 首页
prepage = 上一页
nextpage = defaltStr+2>下一页</a>
//如果处于最后一页
//尾页，下一页不为链接
}else if(pages >= pagecos){
rs.AbsolutePage = pagecos;
prepage = defaltStr+(pagecos-1)+>上一页</a>
lastpage = 尾页
nextpage = 下一页
}else{
rs.AbsolutePage = pages
prepage = defaltStr+(Number(pages)-1)+>上一页</a>
nextpage = defaltStr+(Number(pages)+1)+>下一页</a>
}
}
nowPage = rs.AbsolutePage
nowSize = rs.PageSize
//如果处于最后一页，并且数据显示数量与每页显示数据数量不相等时
//因为最后一页不可能每次都刚好与每页显示数据数量相等
//所以需要定义一个不相等的方法
if(nowPage >= pagecos && (pagecos*rs.PageSize)%counts != 0){
nowSize = counts%rs.PageSize
}
%>
<table width=100% border=0 cellspacing=0 cellpadding=0 class=userinfo>
<tr>
<td align=center>
<!--显示首页，上一页 -->
<%=firstpage%><%=prepage%>
跳转到第 <select onchange=location.href=<%=thisUrl%>?page=+this.value>
<%
//分页依靠循环显示
for(var num=1; num<=pagecos; num++){
if(nowPage == num){
%>
<option value=<%=num%> selected=selected><%=num%></option>
<%
}else{
%>
<option value=<%=num%>><%=num%></option>
<%
}
}
%>
</select> 页
<!--显示下一页，尾页 -->
<%=nextpage%><%=lastpage%>
<!--显示当前页数，总页数，总记录数，每页显示数据数量 -->
共 <%=nowPage%> / <%=pagecos%> 页 <%=counts%> / <%=rs.PageSize%> 条记录
</td>
</tr>
<%
//内容依靠循环显示
for(var i=1;i<=nowSize;i++){
%>
<tr>
<td><span>用户IP：</span><%=rs(usip)%></td>
</tr>
<tr>
<td><span>建议：</span><%=rs(us1)%></td>
</tr>
<tr>
<td><span>提交时间：</span><%=rs(usetime)%></td>
</tr>
<%
//数据库游标向移向下一条记录
rs.MoveNext();
}
%>
</table>
<%
//如果数据库游标不在数据库列中
}else{
Response.Write(没有用户信息!)
}
//关闭数据库连接
rs.Close()
%>