易截截图软件、单文件、免安装、纯绿色、仅160KB

asp 输出了一个表格 怎样分页

asp 输出了一个表格 是显示客户信息的 但是客户太多 几千个 怎样分页
请高手讲一下大致思路。
http://www.blueidea.com/tech/program/2007/4884.asp

书籍分页显示实例:
HTML code:

<!--#include file="conn.asp" -->
<%
set rs_booklist=Server.CreateObject("ADODB.RecordSet")
sql="SELECT BookID, BookName, author from DB_bookinfo ORDER BY BookID"
rs_booklist.open sql,conn,1,3 'conn是自己写的一个连接数据库函数
If rs_booklist.Bof AND rs_booklist.Eof Then
Response.Write "没有数据"
Else
Dim page_size '此变量用来存放每一页的记录数。
Dim page_nonce '此变量用来存放当前页的页码。
Dim page_total '此变量用来存放总页数。
page_size=7 '将第一页记录数设置为7条。
rs_booklist.PageSize=page_size
page_total=rs_booklist.PageCount
'下面5句,是判断网页是不是刚打开,若是,则将1赋给变量page_nonce(即当前页为第一页),
'若不是,则将由Request对象的Querystring集合从HTTP查询字符串中获取来的变量值(当前页码)赋给变量page_nonce。
If Request.QueryString("page_nonce")<>"" Then
page_nonce=Cint(Request.QueryString ("page_nonce"))
Else
page_nonce=1
End If
'将当前页码赋给记录集对象的表示当前记录页号的属性(AbsolutePage)。
rs_booklist.AbsolutePage=page_nonce
Dim I
I=page_size
'通过Do While 循环语句,将当前页的每一条记录读取出来。
Do While Not rs_booklist.Eof And I>0
I=I-


相关问答:

asp.net中可输入的下拉框的问题 - .NET技术 / ASP.NET

Imports System.ComponentModel
Imports System.Web.UI
Imports System.Web.UI.Design
Imports System.Web.UI.WebControls
Namespace CBDAspNet.WebControls.HTML
  ''' <summary>
  '' ......

求一ASP嵌套页代码 - Web 开发 / ASP

A页面
<table width="200" border="1">
  <tr>
  <td>1</td>
  <td>3</td>
  <td><!--#include/top.html#-- ......

asp数据库问题 - Web 开发 / ASP

各位大虾,我做了一个ASP得通讯录,但是除了查询功能好像其他都有问题,其中添加功能如下,能指导一下我哪里出错了吗?
<html>
<head>
<title>无标题文档</title>
</head>
<b ......

ASP链接SQL的简单登陆界面 - .NET技术 / ASP.NET

protected void btnLogin_Click(object sender, EventArgs e)
  {
  SqlConnection conn = new SqlConnection("Server = (local);user id = sa;pwd = 1;database = Login");
&nb ......

ASP 使用域账号登陆 - Web 开发 / ASP

一个系统平台,在放入一个服务器里面,然后每台电脑都有配置的域账号,在ASP里面怎么使用域账号进行登陆!
ASP的帐号是独立的,它自己是不认识你的域账号的,除非你预先把帐号输入它的数据库中或者通过注册页面进行 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号