国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

創建一個ASP通用分頁類

2024-05-04 11:03:07
字體:
來源:轉載
供稿:網友
從開始學習到使用ASP到現在也寫了不少程序了,最令人頭痛的是寫數據分頁,每次都是由于幾個變量名或幾個參數的不同,因而需要每次都寫哪一段冗長而又繁雜的分頁代碼,代碼長了使得程序的可讀性變差,容易出差,調試半天也找不出錯在哪里,所以慢慢的我開始使用一些網上的提供的分頁函數或分頁類。的確省事不少,但是通常的函數和類的做法都是就數據顯示部分也封裝了起來,每次為了達到自己需要的顯求效果要去改動函數或者類的本身,所以使用起來也不是怎么方便,自己寫的分頁改起來已經夠復雜了,更不要說別人的了。

所以趁昨天有空自己寫了一個分頁的類,自我感覺良好(不要用雞蛋砸我),在這里和大家分享一下自己的經驗(談不上經驗,感想吧)。在這里我也不想說分頁的原理了,反正大家都懂,要我往深入的談我也不會。呵呵。

一、創建分頁類的目標
在寫之前,我曾想過,我究竟要寫怎么樣一個類,回想起以前寫分頁過程的時候,最煩的莫過于每次都要寫哪一段復雜的分頁代碼,最大的煩惱每次都是僅僅幾個變量名的不同。所以第一個要實現的就是要把這個封裝起來,第二個就是要把分頁的導航條也封裝起來,第三個,不習慣哪些把數據顯示部分也封裝起來的方法,這不是方便編程,對與哪些對顯示效果每次都不同的用戶來說,比自己寫分頁還要麻煩。所以我的目地就是對RecordSet進行一些簡單的封裝。

二、創建過程
所以我寫的第一個屬性,就是返一個經過處理的RecordSe

Public Property Get GetRs()
  Set XD_Rs=Server.createobject("adodb.recordset")
  XD_Rs.PageSize=PageSize
  XD_Rs.Open XD_SQL,XD_Conn,1,1
  If not(XD_Rs.eof and XD_RS.BOF) Then
  If int_curpage>XD_RS.PageCount Then
int_curpage=XD_RS.PageCount
  End If
  XD_Rs.AbsolutePage=int_curpage
  End If
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 嵩明县| 营山县| 鄂尔多斯市| 永丰县| 临澧县| 汝南县| 阜新市| 嵊州市| 莱芜市| 开江县| 凯里市| 凤翔县| 定边县| 鹤峰县| 赤壁市| 铜梁县| 武平县| 喀什市| 平利县| 鄂托克旗| 南开区| 麻阳| 璧山县| 麻栗坡县| 福鼎市| 玉山县| 普兰县| 中超| 景德镇市| 团风县| 徐汇区| 崇礼县| 桦甸市| 伊通| 平塘县| 朝阳区| 双流县| 江达县| 海宁市| 桂平市| 临颍县|