asp + sqlserver 分页方法(不用存储过程)

2016-01-29 20:02 13 1 收藏

asp + sqlserver 分页方法(不用存储过程),asp + sqlserver 分页方法(不用存储过程)

【 tulaoshi.com - ASP 】

       我的一个asp + sqlserver的分页程序:这个程序的特点就是指将当前页的纪录掉到页面上来。性能不错,而且不用存储过程,由于代码没有封装,所以很零散,要用到你的程序中,需要先简单读读。然后注意需要自己设置的地方的意思。有些是可以省略的。有些参数传递也是可以省略的。

        代码如下:

''''  塞北的雪  分页利器(sql server)  不用存储过程   -------------------------

'其中注释中有 ###的需要用户设置
'其中注释中有 参数传递 ** 的 说明要通过参数 传递。


'定义变量
dim tOption                  '查询条件
dim tOrder                   '排序字符串     
dim tOrderField              '排序字段        可通过参数获得:order_field
dim tOrderDirection          '排序方向        可通过参数获得:order_direction

dim tPageSize                '页大小
dim tTotalCount              '总记录数        可通过参数获得:t_count
dim tPageCount               '页数
dim tCurPage                 '当前页号        可通过参数获得:page

dim tTableName               '表或者视图名
dim tFieldAlias              '行号的别名
dim tFieldList               '查询的字段列表
dim tPageField               '用于分页的字段

dim r_count                  '查得的记录数


set rs=server.createobject("adodb.recordset")        '记录集对象

'排序处理
tOrderField=Request("order_field")                   '获得排序字段(参数传递 **)
tOrderDirection=Request("order_dir")                 '获得排序方向(参数传递 **)

if(tOrderField="") then tOrderField="item_code"       ' ### 设置默认排序字段
if(tOrderDirection="") then tOrderDirection="asc"     ' ### 设置默认排序方向

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/asp/)

tOrder=" order by " & tOrderField & " " & tOrderDirection & " "   '生成排序字符串

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/asp/)


'定义参数
tPageSize=find_rs_count        ' ### 设置页大小
tTableName="view_select1"      ' ### 设置与查询的表格或视图
tFieldList=" * "               ' ### 欲查询的字段列表
tPageField="item_code"         ' ### 设置一个主键或唯一索引的字段 ,用于分页计算


'页数处理
tCurPage=Request("page")             '获得当前页(参数传递 **)
tTotalCount=Request("t_count")       '获得总页数(参数传递 **)

if(tCurPage="") then tCurPage=1
if(cint(tCurPage)=0) then tCurPage=1
if(tPageCount="") then tPageCount =1
if(cint(tPageCount)=0) then tPageCount=1

' 构造查询条件,根据具体的程序,肯定不一样。但是最后的条件必

来源:https://www.tulaoshi.com/n/20160129/1510612.html

延伸阅读
标签: Web开发
1.调用存储过程的一般方法 先假设在sql server中有一存储过程dt_users: CREATE PROCEDURE [dbo].[dt_users] AS select * from users return GO 第一种方法是不利用command对象,直接用recordset对象 set rs=server.createobject("adodb.recordset") sql="exec dt_users" rs.open sql,c...
标签: ASP
1、调用没有参数的存储过程 <% set conn=server.CreateObject("adodb.connection") set cmd=server.CreateObject("adodb.command") strconn="dsn=pubs;uid=sa;pwd" conn.Open strconn set cmd.ActiveConnection=conn cmd.CommandText="{call nono}" 'set rs=cmc.exe 或者cmd.execute set rs=cmd.Execute() % 2、一个输入的参数的存储过...
这里讨论的是ADO调用存储过程,按MSDN的例子,一般都是下面的调用方法(节选自MSDN): HRESULT hr = S_OK;     // Define ADO object pointers.     // Initialize pointers on define.     // These are in the ADODB::  namespace.     _RecordsetPtr pRstByRoyalty = ...
标签: ASP
  建立表: CREATE TABLE [TestTable] ( [ID] [int] IDENTITY (1, 1) NOT NULL , [FirstName] [nvarchar] (100) COLLATE Chinese_PRC_CI_AS NULL , [LastName] [nvarchar] (100) COLLATE Chinese_PRC_CI_AS NULL , [Country] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL , [Note] [nvarchar] (2000) COLLATE Chinese_PRC_CI_...
标签: ASP
  <!--#include file="inc\public.asp"-- <!--#include file="inc\conn.asp"-- <html <head <meta http-equiv="Content-Type" content="text/html; charset=gb2312" <title</title </head <body <% '----------------------------------- dim sp_common Set sp_common = Server.CreateObject("ADODB.Co...

经验教程

295

收藏

46
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部