掌握ASP分頁技術詳解

iDotNetSpace發表於2008-09-19

看看功能:分頁程式首先讀取每頁預置的記錄條數,在此是5條,其它將在下頁中顯示,同時提示當前頁數、總頁數、總記錄數,當顯示的頁數為第一頁時,“首頁”、“上一頁”連結失效,當顯示的頁數為最後頁時,“下一頁”、“尾頁”連結失效。

接下來,以例項的方式告訴大家怎麼一步步的做出這種分頁效果。

首先,資料庫中欄位record_info存在於info表中(例項下載中有資料庫),先連結資料庫並將一個記錄集開啟,以下程式碼:

Set conn=Server.CreateObject("Adodb.Connection")
connstr="provider=Microsoft.JET.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb")
conn.open connstr
Set rs=Server.CreateObject("Adodb.Recordset")
sql="Select * from info"
rs.open sql,conn,1,1
%>
這段程式碼不詳解,相信初入門的都會,具體的解釋可以看看《手把手教你用ASP做留言本》教程,

接下來這是分頁中比較重要的部分,了了三行而已:

rs.pagesize=5
curpage=Request.QueryString("curpage")
if curpage="" then curpage=1
rs.absolutepage=curpage
%>
第二句:rs.pagesize=5,這個什麼意思呢?它就是在Recordset物件中的一個內建屬性,它的作用是指定每頁的記錄條數,設定為5時,每5條記錄放在一起成一頁,比如例項中共有21條記錄,那麼,使用rs.pagesize分頁後,這21條記錄將分成5頁進行顯示。

第三、四句:這裡主要是用於翻頁的功能,將URL的post引數curpage傳遞給curpage變數,這個curpage將得到瀏覽者想要到達的頁數,同時用if語句將沒有傳遞到curpage引數的頁直接賦於第一頁的值。(執行一下例項就會明白)

第五句:rs.absolutepage,這個也是個內建的屬性,,它代表的意思就是將curpage變數的數值指定為當前頁。

現在開始可以讓記錄迴圈顯示了:

for i= 1 to rs.pagesize
if rs.eof then
exit for
end if
%>


rs.movenext
next
%>
第二句:
利用for迴圈在每頁顯示rs.pagesize屬性中指定的記錄數。

第三、四、五句:
這句意思是當最後一頁達不到指定記錄時就退出迴圈,以免出錯。

第七句:
繫結從資料庫取出的record_info欄位,就是叫這欄位內的記錄迴圈顯示的。

第九句:
用rs.movenext方法將rs記錄集往下移一條記錄。

第十句:
for迴圈語句。

另外可以用讀出當前頁次,用讀出總頁數,用讀出總記錄數。例如:“當前第頁,共有頁,共有:條記錄”。

在顯示首頁、上頁、下頁、尾頁功能上,採用了if...else...語句,比較好懂。



首頁

首頁


上一頁

上一頁


下一頁

下一頁


尾頁

尾頁

理解一下:

首頁:
這個使用當前頁是否為第一頁時判別,如果當前為第一頁(也就是首頁),那麼顯示首頁兩字,沒有連結,否則提供直接跳轉到首頁的連結。
上一頁:
當前為第一頁時,連結失效,反過來,連結到當前面的上一頁,這裡使用:,就是用當前的頁數減去1,得到上一頁。
下一頁:
這裡需要使用rs.pagecount這個屬性來比較,假如總頁數小於當前頁數加1的值,那表明這就是第後一頁,連結將失效,否則連結到下一頁。
尾頁:
和下一頁的功能一樣判定出是最後頁時連結失效,否則將當前頁指定為rs.pagecount(總頁數)。
這個教程到此結束,經過講解,大家應該對ASP的分頁技術有較深的理解了吧?有問題可以通過在blog留言的方式和我聯絡。

來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/12639172/viewspace-450335/,如需轉載,請註明出處,否則將追究法律責任。

相關文章