主頁(yè) > 知識(shí)庫(kù) > ASP萬(wàn)用分頁(yè)程序

ASP萬(wàn)用分頁(yè)程序

熱門標(biāo)簽:鄭州智能外呼電銷機(jī)器人廠家 廣東語(yǔ)音外呼系統(tǒng)公司 云南便宜外呼系統(tǒng)平臺(tái) 沈陽(yáng)電話機(jī)器人公司 虛擬電話外呼系統(tǒng) 沈陽(yáng)三五防封電銷卡 成都ai外呼系統(tǒng)線路 鄢陵學(xué)校如何做地圖標(biāo)注 長(zhǎng)春公司外呼系統(tǒng)中心

下面這段是基本的分頁(yè)代碼: 

<% sql = "select……………………省略了sql語(yǔ)句 
 Set rs=Server.Createobject("ADODB.RECORDSET") 
 rs.Open sql, conn, 1, 1 
 if not rs.eof then 
  pages = 30 '定義每頁(yè)顯示的記錄數(shù) 
  rs.pageSize = pages '定義每頁(yè)顯示的記錄數(shù) 
  allPages = rs.pageCount'計(jì)算一共能分多少頁(yè) 
  page = Request.QueryString("page")'通過(guò)瀏覽器傳遞的頁(yè)數(shù) 
  'if語(yǔ)句屬于基本的排錯(cuò)處理 
  if isEmpty(page) or Cint(page) < 1 then 
   page = 1 
  elseif Cint(page) > allPages then 
   page = allPages 
  end if 
  rs.AbsolutePage = page 
  Do while not rs.eof and pages > 0 %> 
   這里輸出你要的內(nèi)容……………… 
  ?。? pages = pages - 1 
   rs.MoveNext 
  Loop 
 else 
  Response.Write("數(shù)據(jù)庫(kù)暫無(wú)內(nèi)容!") 
 End if 
 rs.Close 
 Set rs = Nothing %>

  系統(tǒng)已經(jīng)為數(shù)據(jù)分頁(yè)了,下面就看看這次探討的關(guān)鍵問(wèn)題分頁(yè)函數(shù)的定義

<% SUB pageUrl(pUrl) 
 Dim eUrl 
 txts = Request.ServerVariables("URL") 
 txts = left(txts,instrrev(txts,"/",len(txts))-1) 
 eUrl = "http://";  Request.ServerVariables("server_name")  txts 
 For i =1 to allpages 
  txt = "" 
  txt = "<strong>" 
  txt = txt  "<a href="  eUrl  pUrl  "page="i  ">" 
  if i = Cint(Page) then txt = txt  "<font color='bb0000'>" 
   txt = txt  (i) 
   if i = Cint(Page) then txt = txt  "</font>" 
    txt = txt  "</a> ∥ </strong>" 
    Response.Write(txt) 
 Next 
END sub %>

  把上面這個(gè)分頁(yè)函數(shù)代碼COPY存成一個(gè)ASP文件,在需要使用的頁(yè)面里用include來(lái)引入他調(diào)用的時(shí)候只要 Call("/你調(diào)用的文件名?")就ok了,比如我的 news頁(yè)面里要調(diào)用那么就是<%Call("/news.asp?")%>

剛才我們所到這是有限制的意思就是說(shuō)第一段代碼里除了sql查詢內(nèi)容和輸出內(nèi)容可以更改,其他的聲明記錄集的對(duì)象,page, pages, allpages這些變量都不能更改,否則將無(wú)法運(yùn)行~其實(shí)這個(gè)程序是無(wú)關(guān)緊要的,最主要的就是,這個(gè)分頁(yè)函數(shù)可以在任何一個(gè)asp葉面里調(diào)用。

您可能感興趣的文章:
  • 簡(jiǎn)單的ASP分頁(yè)代碼(測(cè)試正確)
  • asp 簡(jiǎn)單分頁(yè)代碼
  • ASP中實(shí)現(xiàn)分頁(yè)顯示的七種方法
  • ASP 數(shù)字分頁(yè)效果代碼
  • ASP分頁(yè)類(支持多風(fēng)格變換)
  • asp+ajax實(shí)現(xiàn)靜態(tài)頁(yè)面分頁(yè)的代碼
  • ASP無(wú)組件分頁(yè)實(shí)現(xiàn)思路及代碼

標(biāo)簽:馬鞍山 湖北 防城港 遼陽(yáng) 四平 平頂山 朝陽(yáng) 孝感

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《ASP萬(wàn)用分頁(yè)程序》,本文關(guān)鍵詞  ASP,萬(wàn)用,分頁(yè),程序,ASP,萬(wàn)用,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《ASP萬(wàn)用分頁(yè)程序》相關(guān)的同類信息!
  • 本頁(yè)收集關(guān)于ASP萬(wàn)用分頁(yè)程序的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章