asp 存储过程分页代码第1/2页
程序员文章站
2022-03-26 08:34:13
存储过程采用的是select top 加 not in的方式完成,速度也算是相当快了 我测试过了百万级数据量一般查询在1秒一下,贴出来大家交流下,看有没有什么好的建议。 简...
存储过程采用的是select top 加 not in的方式完成,速度也算是相当快了 我测试过了百万级数据量一般查询在1秒一下,贴出来大家交流下,看有没有什么好的建议。
简单几句话就可以实现分页功能,请看代码:
最简单使用方法(适用于任何数据表):
test.asp
<!--#include file="conn.asp"-->
<!--#include file="Page.asp"-->
<%
Set My = New Page
With My
.SetConnstr=Connstr '数据库链接字符串
.SetStrTable="users" '表名
.SetStrText="id,username,type,names" '查询的字段
.SetStrIndex="id" '主键
rsArray=.GetRs() '返回数据,类型为数组
End With
%>
<table>
<%
if IsArray(rsArray) then
For i = 0 To UBound(rsArray, 2)
%>
<tr>
<td><%= rsArray(0, i) %></td>
<td><%= rsArray(1, i) %></td>
<td><%= rsArray(2, i) %></td>
</tr>
<%
next
end if
%>
<tr>
<td colspan="4">共<%= My.GetTotalNum %>条 每页<%= My.GetiPageSize %>条 共<%= My.GetTotalPage %>页 页码:<%= My.GetFenYeJmp(false) %></td>
</tr>
</table>
简单几句话就可以实现分页功能,请看代码:
最简单使用方法(适用于任何数据表):
test.asp
复制代码 代码如下:
<!--#include file="conn.asp"-->
<!--#include file="Page.asp"-->
<%
Set My = New Page
With My
.SetConnstr=Connstr '数据库链接字符串
.SetStrTable="users" '表名
.SetStrText="id,username,type,names" '查询的字段
.SetStrIndex="id" '主键
rsArray=.GetRs() '返回数据,类型为数组
End With
%>
<table>
<%
if IsArray(rsArray) then
For i = 0 To UBound(rsArray, 2)
%>
<tr>
<td><%= rsArray(0, i) %></td>
<td><%= rsArray(1, i) %></td>
<td><%= rsArray(2, i) %></td>
</tr>
<%
next
end if
%>
<tr>
<td colspan="4">共<%= My.GetTotalNum %>条 每页<%= My.GetiPageSize %>条 共<%= My.GetTotalPage %>页 页码:<%= My.GetFenYeJmp(false) %></td>
</tr>
</table>