ado元件之分頁程式
1,rs.recordcount
很顯然,recordcount就是用來顯示資料庫表中一共多少條記錄的,也可以形象地說表中一共有多少行。經常用在分頁中就是一共有n篇文章等總計的資訊顯示。
2,rs.pagesize
rs.pagesize也就是一頁的大小,也就表示一張asp頁可以顯示記錄的條數。值是自己定義的,比如經常看到的每頁顯示n篇文章之類的資訊。
3,rs.absolutepage 和 rs.pagecount
說到分頁,一定不能不提到 rs.absolutepage 。記錄集的absolutepage屬性最主要的作用就是決定著當前顯示的是第幾頁。它的值是有依據的,指定了rs.pagesize,那麼rs.pagecount的資訊值就是rs.recordcount和rs.pagesize整除結果。比如:總資訊記錄rs.recordcount共20條,每頁顯示條數rs.pagesize設為5條,那麼頁數rs.pagecount數就是20/5=4頁次,而rs.absolutepage則就只能是第1頁,第2頁……第4頁。
說到現在,弄個具體程式來除錯一下。繼續對showit.asp進行修改如下:
<%
set rs = server.createobject ("adodb.recordset")
sql = "select * from cnarticle order by cn_id desc"
rs.open sql,conn,1,1
%>
<%
page=request.querystring("page") 'page值為接受值
rs.pagesize = 2 '每頁顯示記錄數
rs.absolutepage = page '顯示當前頁等於接收的頁數
%>
<%
for i = 1 to rs.pagesize '利用for next 迴圈依次讀出當前頁的記錄
if rs.eof then
exit for
end if
response.write("
文章內容是:"& rs("cn_content"))
rs.movenext
next%>
<%
rs.close
set rs = nothing
conn.close
set conn=nothing
%>
here,你除錯的前提就是資料庫中的記錄相對要大於4條,這樣測試效果才明顯;還有測試的方法就是在showit.asp後面新增?page=1或者?page=2等除錯觀察網頁顯示效果。
其實,說到底,顯示資料庫內容就是
<%
for i = 1 to rs.pagesize
if rs.eof then
exit for
end if
response.write("
文章內容是:"& rs("cn_content"))
rs.movenext
next%>
起的作用,但想象一下:該程式應該都只能顯示出2條資訊(一直不變的2條資訊)。但為什麼加上?page=1和?page=2會顯示不同的結果呢?……那絕對就是rs.absolutepage的作用了。這個搞清楚,相信分頁的整體架構就有點眉目了。
/<%=rs.pagecount%>]
[共<%=rs.recordcount%>篇<%=rs.pagesize%>篇/頁]
轉到">頁
<%
rs.close
set rs = nothing
conn.close
set conn=nothing
%>
效果頁面參看:
長長的分頁**,搞懂是真不容易,平台引用起來還需要修改也是比較麻煩。最後能做成乙個函式,下次呼叫起來就很方便了。
end function
%>
如要引用,則可以:
<%call pagination(rs.pagecount,rs.pagesize,page,rs.recordcount) %>
可呼叫物件
我們可以向演算法傳遞任何類別的可呼叫物件 函式,函式指標,過載了函式呼叫運算子的類,lambda 表示式,bind 函式。函式物件 1 如果類過載了函式呼叫運算子,則我們可以像使用函式一樣使用該類的物件。因為這樣的類同時也能儲存狀態,所以與普通函式相比他們更加靈活。例 struct absint i...
可呼叫物件
在python中可以用callable函式檢視乙個物件是不是可呼叫 1 deffn 2print ha ha ha 34callable fn 5 true 乙個類被例項化後,這個例項物件是乙個不可呼叫物件 1 class fun 2def init self,name 3 self.name na...
分頁儲存過程呼叫
獲得資料集 表名 需要返回的列,預設為全部 排序欄位名 頁尺寸 頁碼 返回記錄總數,非 0 值則返回 設定排序型別,非 asc 值則降序 查詢條件 注意 不要加 where 資料集 public static sqldatareader get datareader string tblname,s...