人人做人人澡人人爽欧美,国产主播一区二区,久久久精品五月天,羞羞视频在线观看免费

當前位置:蘿卜系統(tǒng)下載站 > 技術開發(fā)教程 > 詳細頁面

RecordSet分頁例子

RecordSet分頁例子

更新時間:2022-09-17 文章作者:未知 信息來源:網絡 閱讀次數:


我用Recordsets建立頁轉移,它顯得比較簡單和易懂,如果Recordset建立正確的話,則不沒有分頁錯誤。
=============================================
'設置一個recordset頁面。在這個例子里,我們已有一個已經做好的數據庫,并且把分頁的每一頁設為顯示一條記錄
dim conn ' ADO connection Dim RS' Recordset Dim sSQL ' SQL Get
'if Pagenum = "" Then Pagenum = 1
Set conn = server.createobject("ADODB.connection")
Conn.Open"DSN=DatabaseName "set RS = Server.CreateObject("adodb.RecordSet")
sSQL = "Select * From tblOrders" Rs.Open sSql, Conn, 3 ' 建立單個頁
RS.Pagesize = 1 ' 設置在每頁顯示多少條記錄iCnt = RS.PageCount ' 得到recordset里的記錄總數
Select Case Request("NAV") Case "" session("Pagenum") = 1
case "First" ' First Record session("Pagenum") = 1
case "Prev" ' Previous Record
if session("Pagenum") > 1 then
session("Pagenum") = session("Pagenum") - 1 End If
case "Next" ' Next Record
if session("Pagenum")< RS.PageCount then
session("Pagenum") = session("Pagenum") + 1 End if
case "Last" ' Last Record session("Pagenum") = RS.PageCount
End Select ' 轉到指定的頁面(這里是session("pagenum")
RS.Absolutepage = Clng(session("Pagenum")) ' // 在Form中顯示記錄轉移
' // 記錄轉移按鈕設置 <form method="GET" action="secureorder.asp">
<p><input type="submit" name="NAV" Value="First"><input type="submit" value="Prev"
name="NAV"><input type="submit" value="Next" name="NAV"><input type="submit" value="Last"
name="NAV"></p> </form>
=====================================================
這是比較容易實現分頁的方法:)yobigd@home.com -----------------------------------------------
ASP精品屋 翻譯整理by explorer---------------------------------------------

(出處:熱點網絡)

溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統(tǒng)下載排行

網站地圖xml | 網站地圖html
主站蜘蛛池模板: 广西| 霍山县| 多伦县| 云梦县| 牙克石市| 永州市| 二手房| 澜沧| 镇原县| 玛纳斯县| 讷河市| 井陉县| 黎平县| 东方市| 松原市| 美姑县| 沾化县| 商南县| 甘德县| 界首市| 县级市| 淮阳县| 弥渡县| 环江| 嘉义市| 顺平县| 团风县| 巴南区| 诸城市| 甘孜县| 稻城县| 漳浦县| 含山县| 咸阳市| 佛教| 沂水县| 沭阳县| 广宗县| 汝阳县| 习水县| 保靖县|