• 首页
• 服务器租用
• 企业邮箱
• 虚拟主机
• 网站程序
• 营销推广
• 网站建设
• 域名注册
• 前端开发
• 网站备案

• 当前位置：创新互联 >> 常见问题 >> 网站程序 >> asp程序 >> Asp+AJAX分页

Asp+AJAX分页

• 作者：创新互联 文章来源：网站程序部 点击数： 更新时间：2012-01-25
• 　　今天创新互联网站建设小编要跟大家说说Asp+AJAX分页问题。具体代码请看以下内容：
  <%@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参数不为空就执行
  if(Request("page").Count != 0){
  //定义默认链接字符串，第一页，尾页，上页，下页
  //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()
  %>
• ASP常用源代码总结 :上一篇
  ASP的语法和变量 :下一篇