jb51內(nèi)容分頁(yè)函數(shù) 原創(chuàng)
原創(chuàng) 更新時(shí)間:2006年08月31日 00:00:00 原創(chuàng) 作者:
復(fù)制代碼 代碼如下:
allpages=ubound(contentarray)
for dxy_ii=0 to allpages
pagelist1="當(dāng)前"&dxy_ii+1&"/"&(allpages+1)&"頁(yè) "
pagepre=""
pagelast=""
if dxy_ii>0 then
cpage=cint(dxy_ii)
if cpage<0 then cpage=0
if cpage=1 then
cpage1=id&".htm"
else
cpage1=id&"_"&cpage&".htm"
end if
pagepre="<a href="&cpage1&">上一頁(yè)</a> "
end if
if dxy_ii<allpages then pagelast="<a href="&id&"_"&dxy_ii+2&".htm>下一頁(yè)</a>"
for dxy_i=0 to allpages
if dxy_i=0 then
if dxy_ii=dxy_i then
alist=dxy_i+1&" "
else
alist=alist&"<a href="&id&".htm>"&dxy_i+1&"</a> "
end if
else
if dxy_ii=dxy_i then
alist=alist&(dxy_i+1)&" "
else
alist=alist&"<a href="&id&"_"&dxy_i+1&".htm>"&dxy_i+1&"</a> "
end if
end if
next
pagelist=pagelist1&pagepre&alist&ahlist&pagelast
alist=""
相關(guān)文章
asp提示無(wú)效使用?Null:?Replace的解決方法
這篇文章主要介紹了asp提示無(wú)效使用?Null:?Replace,需要的朋友可以參考下2014-12-12
asp之自動(dòng)閉合HTML/ubb標(biāo)簽函數(shù) 附簡(jiǎn)單注釋
在用到編輯器時(shí),就會(huì)碰到一點(diǎn),那就是標(biāo)簽的閉合問(wèn)題,這個(gè)問(wèn)題非常嚴(yán)峻,因?yàn)檫@可能會(huì)導(dǎo)致網(wǎng)頁(yè)顯示的整體樣式受到破壞。2010-04-04
ASP把長(zhǎng)的數(shù)字用逗號(hào)隔開顯示的代碼
對(duì)于一些比較長(zhǎng)的數(shù)字,我們可以用asp實(shí)現(xiàn)隔開顯示,尤其是一些金錢相關(guān)的東西2008-06-06
[圖]Flash+ASP實(shí)現(xiàn)電子互動(dòng)地圖在線標(biāo)注功能
[圖]Flash+ASP實(shí)現(xiàn)電子互動(dòng)地圖在線標(biāo)注功能...2007-03-03
ASP中Session技巧 默認(rèn)過(guò)期時(shí)間為20分鐘
寫過(guò)稍微大型一點(diǎn) ASP 的人都知道,Session 這個(gè)對(duì)象真是好用,它可以用來(lái)記錄使用者私有的資料變量,既安全又方便。但是你真的知道 Session 的運(yùn)作原理嗎?2012-08-08
用asp實(shí)現(xiàn)無(wú)組件生成驗(yàn)證碼的方法2種
用asp實(shí)現(xiàn)無(wú)組件生成驗(yàn)證碼的方法2種...2007-01-01

