關於ASP的分頁技術

2021-04-02 21:54:04 字數 2531 閱讀 7453

在web系統中,對於大批量的資料,單一的畫面無法顯示全部的資料,所以就需要使用分頁顯示技術。由於asp主要使用ado連線資料庫,所以asp分頁技術也主要涉及到ado的recordset 物件。

recordset 物件主要關於分頁的屬性如下:

(1)absolutepage屬性 識別當前記錄所在的頁碼 

例如:rs.absolutepage=1

(2)absoluteposition 屬性 可根據其在 recordset 中的序號位置移動到記錄,或確定當前記錄的序號位置。提供者必須支援該屬性的相應功能才能使用該屬性。                      

(3)pagecount屬性 確定 recordset 物件中資料的頁數。「頁」是大小等於 pagesize 設定的記錄組。 該值為 -1 以表明 pagecount 無法確定。

例如:totalpages = rs.pagecount

(4)pagesize 屬性 可確定組成邏輯資料頁的記錄數。

例如:pagesize = 10

(5)recordcount 屬性 可確定recordset物件中記錄的數目。

例如:total = rs.recordcount

一.導航樣分頁:

舉例說明:

<%

dim sql

dim page,pagesize

dim total,totalpages

pagesize=2

page = request("page")

if(page = "") then page = 1

sql = "select * from tbl1 order by age"

call sqlconnect(sql)

rs.pagesize=pagesize

totalpages=rs.pagecount

total = rs.recordcount

%>

noid

name

age<%for i=1 to pagesize%>

<%=(cint(page) - 1) * cint(pagesize) + i%>

<%=rs("id")%>

<%=rs("name")%>

<%=rs("age")%>

<%rs.movenext

if rs.eof then exit for

next%>

<%if(cint(page) <= cint(totalpages)) then%>      

共<%=totalpages%>頁、當前第<%=page%>頁

首頁-<%if page > 4 then %>><%=page - 4%>

-<%end if%>

<%if page > 3 then %>><%=page - 3%>

-<%end if%>

<%if page > 2 then %>><%=page - 2%>

-<%end if%>

<%if page > 1 then %>><%=page - 1%>

-<%end if%>

<%=page & "-"%>

<%if totalpages >= page + 1 then %>><%=page + 1%>

-<%end if%>

<%if totalpages >= page + 2 then %>><%=page + 2%>

-<%end if%>

<%if totalpages >= page + 3 then %>><%=page + 3%>

-<%end if%>

<%if totalpages >= page + 4 then %>><%=page + 4%>

-<%end if%>

>末頁

<%end if%>   

<%call sqldisconnect%>

效果:

二.一般分頁:

舉例說明:

<%

dim sql

dim page,pagesize

dim total,totalpages

pagesize=4

page = request("page")

if(page = "" ) then page = 1 

sql = "select * from tbl1 order by age"

call sqlconnect(sql)

rs.pagesize=pagesize

totalpages=rs.pagecount

total = rs.recordcount

if cint(page)<1 then

page = 1 

end if

if cint(page)>cint(totalpages) then

page = totalpages 

end if

<%call sqldisconnect%>

asp分頁技術 經典

language vbscript codepage 936 姓名所屬分類 編號使用者編號 set rs server.createobject adodb.recordset sql select from syscolumns rs.open sql,conn,1,1 if not rs.eof...

透徹掌握ASP分頁技術

近段時間看了一些論壇上面關於分頁的asp程式依然有許多的關注者,但裡面只有 沒有詳細的解釋,對於初學者來說,這樣總是得不到真正的掌握,此次我將針對分頁技術進行詳解,讓大家來理解asp分頁,好了,一起來對分頁程式來次透徹的瞭解吧!首先,來看看演示 接下來,以例項的方式告訴大家怎麼一步步的做出這種分頁效...

ASP分頁技術原始碼

asp分頁技術原始碼 頂熱 本程式檔名為 pages.asp 包含ado常量表檔案adovbs.inc,可從 program files common files system ado 目錄下拷貝 建立資料庫連線,這裡是oracle8.05資料庫 set conn server.createobje...

ASP分頁技術原始碼

本程式檔名為 pages.asp 包含ado常量表檔案adovbs.inc,可從 program files common files system ado 目錄下拷貝 建立資料庫連線,這裡是oracle8.05資料庫 set conn server.createobject adodb.conne...

asp中分頁的功能實現

set rs server.createobject adodb.recordset rs.open select from webdiy mb conn,1,3 if rs.bof and rs.eof then response.write 沒有模板 else 定義分頁 rs.pagesize ...