dreamweaverasp實(shí)現(xiàn)分頁技術(shù)

《dreamweaverasp實(shí)現(xiàn)分頁技術(shù)》由會(huì)員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在學(xué)術(shù)論文-天天文庫。

1、DreamweaverASP實(shí)現(xiàn)分頁技術(shù)作者：H期：2007-5-2421:41:22來源：點(diǎn)擊：次評(píng)論今天心惜有點(diǎn)激動(dòng)，想把n關(guān)于用DW+ASP實(shí)現(xiàn)分頁技術(shù)的參考*'分亨給用DW+ASP做網(wǎng)頁的朋友們.去掉只有"第一頁，前一頁，下一頁，最后一頁’?的小痛苦此效果最后的顯示是:第N頁供項(xiàng)1<<12345678910〉〉。用DW+ASP做網(wǎng)頁吋，在綁定記錄集后，代碼頁里馬上山現(xiàn)以下代碼：<%DimRecordset1DimRecordset1_numRowsSetRecordset1=Server.CreateObject(’’ADODB.Recordset

2、")Recordset1.ActiveConnection=MM_數(shù)據(jù)庫名—STRINGRecordset1.Source="SELECT*FROM表名?'Recordset1.CursorType=0Recordsetl.CursorLocation=2Recordset1.LockType=1Recordsetl.Open()Recordset1_nuniRows=0%>現(xiàn)在我們要來對(duì)代碼做點(diǎn)修改，請(qǐng)?jiān)谏隙a屮修改為如下的代碼:<%DimIDimRPPDimPageNo1=1RPP=50PageNo=CInt(Request("PageNo*'))’

3、上面即是新插入的，DimRecordset1DimRecordset1_numRowsSetRecordset1=Server.CreateObject(’’ADODB.Recordset”)Recordset1.ActiveConnection=MM_數(shù)據(jù)庫^_STRINGRecordset1.Source="SELECT*FROM數(shù)據(jù)庫名”Recordset1.CursorType=1’將上面代碼的0改為1.Recordsetl.CursorLocation=2Recordsetl.LockType=1Recordset1.OpenORecordset

4、1—numRows=0’再在此行的下一行開始加入如下代碼:Recordset1.PageSize=RPPIfPageNo<=0ThenPageNo:1Recordset1.AbsolutePage=PageNoSubShowPageInfo(tPageCount，cPageNo)Response.Write"第”&cPageNo&"頁［共u&tPageCount&"頁］"EndSubSubShowPageNavi(tPageCount，cPageNo)IfcPageNo

5、1IfcPageNo>tPageCountThencPageNo=tPageCountDimNaviLengthNaviLength=10’NaviLength:顯示的數(shù)字鏈接個(gè)數(shù)DimI，StartPage，EndPageStartPage=(cPageNoNaviLength)*NaviLength+lIf(cPageNoModNaviLength)=OThenStartPage=StailPage-NaviLengthEndPage=StartPage+NaviLength-1IfEndPage〉tPageCountThenEndPage=tPag

6、eCountIfStartPage>lThenResponse.Writeu?HEndIfIfI=cPageNoThenResponse.Write"

7、a〉nEndIfIfIotPageCountThenResponse.Write” "NextIfEndPage上面代碼中：RPP：指定每頁顯示的記錄條數(shù)。即每頁顯示幾條數(shù)據(jù)。NaviLength：顯示的數(shù)字鏈接個(gè)數(shù)，即10

8、就為123...10的連接個(gè)數(shù)。若要顯示所有連接的頁（個(gè)）數(shù)，你可