一个分页存储过程

转载 2004年06月28日 20:44:00
/*****听以前的同事说asp页面上的分页太慢了(如果数据多了),
就想了这么个笨办法。有些地方还要考虑----比如select top 22 * from cat_list
where T_id not in (select T_id from #change)是否有效率问题;数据不能重复等等
不过灵活性挺好。希望各位高手再给帮忙改正;多谢chair3的帮助---这个存储过程还可以在加入几个变量,随便大家改吧:)*****/


CREATE  proc page
@pagenum int
as
SET NOCOUNT ON             /*-----这一句很重要哦:)),不然它只会认 insert #change......这个数据集:))*/
declare @sql nvarchar(500)  --声明动态sql执行语句
declare @pagecount int      --当前页数

--取得当前数据库的记录总数
declare @row_num int  
begin      
select @row_num=count(*) from cat_list

--创建临时表,作为数据过滤
create table #change (T_id int)

--判断当前页数
if @row_num>6  --大于页面显示记录数,则分页
begin
set  @row_num=@pagenum*6
  
  if @row_num=6
select top 6 * from cat_list
else
begin
set  @row_num=(@pagenum-1)*6
set @pagecount=@row_num
set @sql=N'insert #change (T_id) select top '+cast(@pagecount as char(100))+' T_id from cat_list where T_id not in (select T_id from #change)'
exec sp_executesql @sql
select top 6 * from cat_list where T_id not in (select T_id from #change)
  end
end
else    --只现实全部的数据
select * from cat_list
end
GO



客户端这样调用:
<!--#include file="conn.asp"-->
<!--#include file="adovbs.inc"-->
<%    dim T_com
                                        dim T_rs'declare datamanage recordset
                                       

dim parameters
set T_com=server.createobject("adodb.command")
T_com.ActiveConnection=conn
T_com.CommandText="page"
T_com.CommandType=adCmdStoredProc
'T_com.Prepared=true
set parameters=T_com.CreateParameter("@pagenum",adInteger,adParamInput)
T_com.Parameters.Append parameters
dim page
page=request.QueryString("page")
    if page="" then
        page=1
    end if
T_com("@pagenum")=page
set T_rs=T_com.Execute

do while not T_rs.eof
response.Write T_rs("c_name")
T_rs.movenext
loop
%>
<a href="a.asp?page=<%=page+1%>">ddddd</a>

MySql 分页存储过程

DELIMITER $$ #修改分隔符为 $$ DROP PROCEDURE IF EXISTS sp_MvcCommonDataSource$$ #分隔符 CREATE PROCEDURE sp_M...
  • xxj_jing
  • xxj_jing
  • 2014年06月05日 12:55
  • 6113

Oracle分页存储过程及PLSQL中的调用脚本

撰写过程:网上搜集测试了好多的Oracle分页存储过程代码,经测试整理后终于通过测试,特分享给大家测试步骤:1运行创建包命令;2、运行创建存储过程命令;3、运行调用分页存储过程语句测试环境:windo...
  • xqf222
  • xqf222
  • 2014年06月10日 16:11
  • 2590

MyBatis增删改查操作、MyBatis存储过程、MyBatis分页、MyBatis一对一、MyBatis一对多

一、用到的实体类如下: Student.java package com.company.entity; import java.io.Serializable; import ja...
  • gongzi2311
  • gongzi2311
  • 2015年05月11日 15:37
  • 1397

MS Sql的一个分页存储过程 - wsmall的专栏 - CSDNBlog.mht

  • 2008年09月10日 23:38
  • 194KB
  • 下载

Oralce 写一个分页的存储过程

有返回值的存储过程(列表 结果集)  案例:编写一个过程,输入部门编号,返回该部门所有员工的信 息。对该题的分析如下: 由于Oracle的存储过程没有返回值,它的所有返回值都是通过out 参数...
  • c622724
  • c622724
  • 2012年12月21日 22:08
  • 699

一个分页存储过程【鸡蛋】

ALTER PROCEDURE [dbo].[AdminGetUserList] @PageSize INT, --页尺寸(每页显示数据的数量) @PageIndex INT, ...
  • CCTV_End
  • CCTV_End
  • 2012年09月24日 11:58
  • 342

分享一个分页存储过程

/* 过程功能:分页 创建时间:12-06-09 修改时间:130115,支持多个字段排序分页 */ --CREATE PROCEDURE up_pagination ALTER PROC...
  • xxj_jing
  • xxj_jing
  • 2012年06月09日 20:09
  • 897

oracle查询分页条件通用存储过程

  • 2018年01月10日 09:24
  • 1KB
  • 下载

sqlserver 分页存储过程

  • 2014年11月18日 11:14
  • 44KB
  • 下载

分页存储过程

  • 2016年08月02日 22:50
  • 3KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:一个分页存储过程
举报原因:
原因补充:

(最多只允许输入30个字)