一个简单的ASP调用存储过程分页
来源:互联网 发布:知我也不知女粤语歌 编辑:程序博客网 时间:2024/06/05 11:56
<!--#include file="conn.asp"-->
<%
dim lblname,unid,Pages
lblname="article_info"
Unid="unid"
if request("page")="" then
CurrentPage=1
else
CurrentPage=int(Request("page"))
end if
MaxperPage=3
set rs=conn.execute ("exec sp_page "&lblname&","&unid&",0,0,'*',"&MaxperPage&","&CurrentPage&",'',''")
sql="Select Count(*) from "&lblname
curPages=conn.execute (sql)(0)
Pages=Round(curPages/MaxperPage,0)
%>
<table width="80%" border="0" align="center" cellpadding="2" bgcolor="#CCCCCC">
<tr>
<td width="19%" height="10%" bgcolor="#6688e3"><div align="center">编号</div></td>
<td width="20%" bgcolor="#6688e3"><div align="center">用户</div></td>
<td width="44%" bgcolor="#6688e3"><div align="center">密码</div></td>
<td width="17%" bgcolor="#6688e3"><div align="center">分数</div></td>
</tr>
<%
do While Not RS.EOF
%>
<tr>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("unid")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("title")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("content")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("intime")%></div></td>
</tr>
<%
RS.MoveNext
loop
%>
</table>
<table width="80%" border="0" align="center">
<form action="test.asp">
<tr>
<td height="22"><div align="right">第<%=CurrentPage%>页/<%=Pages%>页
<% if CurrentPage>1 then %>
<a href="test.asp?Page=<%=CurrentPage-1%>">上一页</a> <% end if %>
<% if CurrentPage<Pages then %>
<a href="test.asp?Page=<%=CurrentPage+1%>">下一页</a> <% end if %>
直接到第
<select name="page" CLASS="un_submit">
<%for i=1 to Pages%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
页
<input type="submit" value="Go" CLASS="un_submit">
</div>
</tr>
</form>
</table>
----存储过程----
CREATE PROCEDURE sp_page
@tb varchar(50), --表名
@col varchar(50), --按该列来进行分页
@coltype int, --@col列的类型,0-数字类型,1-字符类型,2-日期时间类型
@orderby bit, --排序,0-顺序,1-倒序
@collist varchar(800),--要查询出的字段列表,*表示全部字段
@pagesize int, --每页记录数
@page int, --指定页
@condition varchar(800),--查询条件
@pages int OUTPUT --总页数
AS
/*
功能描述:对指定表中满足条件的记录按指定列进行分页查询,分页可以顺序、倒序
查询可以指定页大小、指定查询任意页、指定输出字段列表,返回总页数
作 者:pbsql
版 本:1.10
最后修改:2004-11-29
*/
DECLARE @sql nvarchar(4000),@where1 varchar(800),@where2 varchar(800)
IF @condition is null or rtrim(@condition)=''
BEGIN--没有查询条件
SET @where1=' WHERE '
SET @where2=' '
END
ELSE
BEGIN--有查询条件
SET @where1=' WHERE ('+@condition+') AND '--本来有条件再加上此条件
SET @where2=' WHERE ('+@condition+') '--原本没有条件而加上此条件
END
SET @sql='SELECT @pages=CEILING((COUNT(*)+0.0)/'+CAST(@pagesize AS varchar)+
') FROM '+@tb+@where2
EXEC sp_executesql @sql,N'@pages int OUTPUT',@pages OUTPUT--计算总页数
IF @orderby=0
SET @sql='SELECT TOP '+CAST(@pagesize AS varchar)+' '+@collist+
' FROM '+@tb+@where1+@col+'>(SELECT MAX('+@col+') '+
' FROM (SELECT TOP '+CAST(@pagesize*(@page-1) AS varchar)+' '+
@col+' FROM '+@tb+@where2+'ORDER BY '+@col+') t) ORDER BY '+@col
ELSE
SET @sql='SELECT TOP '+CAST(@pagesize AS varchar)+' '+@collist+
' FROM '+@tb+@where1+@col+'<(SELECT MIN('+@col+') '+
' FROM (SELECT TOP '+CAST(@pagesize*(@page-1) AS varchar)+' '+
@col+' FROM '+@tb+@where2+'ORDER BY '+@col+' DESC) t) ORDER BY '+
@col+' DESC'
IF @page=1--第一页
SET @sql='SELECT TOP '+CAST(@pagesize AS varchar)+' '+@collist+' FROM '+@tb+
@where2+'ORDER BY '+@col+CASE @orderby WHEN 0 THEN '' ELSE ' DESC' END
EXEC(@sql)
GO
- 一个简单的ASP调用存储过程分页
- 一个asp.net调用存储过程来分页的代码
- 自己写的一个简单ASP调用存储过程查询
- 自己写的一个简单ASP调用存储过程查询
- 一个简单的存储过程数据分页
- 一个简单的存储过程数据分页
- 一个简单的存储过程数据分页
- 一个SQL存储过程分页和ASP调用
- 分页存储过程--一个简单的SQL存储过程
- 一个简单的oracle分页存储过程的实现和调用
- 一个简单的oracle分页存储过程的实现和调用
- 一个简单的oracle分页存储过程的实现和调用
- 一个简单的oracle分页存储过程的实现和调用
- 一个简单的oracle分页存储过程的实现和调用
- 一个简单的oracle分页存储过程的实现和调用
- 一个简单的oracle分页存储过程的实现和调用
- 一个简单的oracle分页存储过程的实现和调用
- 大数据量分页的存储过程及Asp调用
- ASP中存储过程的调用
- 在Series 60设备上进行调试
- 屏幕/内存同步原则在Symbian编程中的应用
- ACDK白皮书-性能
- 计算数据库总记录
- 一个简单的ASP调用存储过程分页
- 61条面向对象设计的经验原则
- 2004年国内十大暴利行业
- 一篇微软官方的存储过程分页算法
- Jbuilder 9.0+Tomcat 5.x 配置Jsp+Servlet+JavaBean的开发环境
- MySQL数据类型(http://blog.csdn.net/i_like_cpp/)
- [分享]SQl语句学习专题
- 收缩数据库方法
- 老工程师的终告