ICANN认证国际域名顶级注册机构
网站建设,域名注册,空间租用,软件销售,广告设计 域名注册,空间租用, 网站建设,东莞网页设计,域名注册,网站推广,网站开发,网页设计 网站推广,,百度推广,新浪推广,雅虎推广,网易推广 标志设计,画册设计,包装设计,VI策划,企业形象顾问 连邦软件加盟店,提供销遥行,管家婆,速达,用友ERP,诺顿等软件报价及销售 建站必读 腾达网络,上网帮助中心, 腾达为东莞等地,提供网站建设,网站推广,广告设计,软件销售等优质服务!
建站必读


 
 
当前位置:首页 -> 建站必读 -> ASP技术
分頁控制
首先先讀取資料庫,並將查詢結果取出並集結







開啟數據庫部份……省略







將所有的資料集結到一個陣列變數中



sum = rs.recordcount ’錄資料查詢後的總筆數



field = Rs.fields.Count ’錄查詢後資料的總欄位數







redim theData(sum) ’告一陣列變數記錄每筆資料



redim thefield(field) ’告一陣列變數記錄每一欄位的記錄







’出所有查詢的資料並寫入變數中



for j = 0 to sum -1



for i = 0 to field-1 ’得所有欄位資料



thefield(i) = rs.fields(i).value



next



theData(j)=thefield ’所有欄位資料寫入一筆記錄中



rs.movenext ’取下一筆數據



next











設定分頁



PageSize = 10 ’定每頁最大筆數



ingPage = 0 ’定起始頁 (頁碼是由0開始的,而流覽的頁碼則是從1開始)







function PageSet() 當網頁讀取結束後,就會開始執行



{



取得總頁數



PageCount = <%=PageCount%>



取得目前所要顯示的頁碼



ingPage = <%=ingPage%>







利用迴圈產生所有的頁碼,並決定顯示與否



for (i = 0; i < PageCount; i++)



{



if (i == ingPage)



{



theDataPage[i].style.visibility = "visible";



document.thePage.NowPage.value = i+1;



}



else



{



theDataPage[i].style.visibility = "hidden";



}



}















}



function PageChange(PageNumber)



{



利用迴圈來達到頁面顯示的切換



for (i = 0; i < PageCount; i++)



{



if (i == PageNumber)



{



theDataPage[i].style.visibility = "visible";



document.thePage.NowPage.value = i+1;



}



else



{



theDataPage[i].style.visibility = "hidden";



}



}







}



function PageUp()



{



計算上一頁的頁碼,並將結果傳給頁面切換的函數來執行



PageCount = <%=PageCount%>



ingPage = <%=ingPage%>



PageNumber = thePage.NowPage.value -2



if (PageNumber < 0)



{



PageNumber = 0



}



PageChange(PageNumber)











}



function PageDown()



{



計算下一頁的頁碼,並將結果傳給頁面切換的函數來執行



PageCount = <%=int(PageCount)%>



ingPage = <%=ingPage%>



PageNumber = thePage.NowPage.value



if (PageNumber >= PageCount)



{



PageNumber = PageCount -1



}



PageChange(PageNumber)







}



顯示介面部份







首先先建立表單抬頭的欄位名稱部份



<table>


<
 
 
本站关键词:
|东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞||东莞网站建设|东莞网页设计|东莞网络公司|网站建设|网页设计|网络公司|网站制作|网站开发|东莞域名空间|东莞广告公司|东莞广告设计|网站建设东莞|
域名注册 | 虚拟主机 | 网站建设 | 网站推广 | 广告设计 | 帮助中心 | 软件中心 | 关于腾达
东莞市腾达信息工程有限公司      本站网络实名: 东莞网站建设
地址:东莞市新城市中心区第一国际B座610   邮编:523007
电话:0769-22026071 22026072 传真:0769-22026076 24小时服务热线:13712032014
© 2002~2005 腾达网络   版权所有