查看完整版本: [原创]我的分页代码

[原创]我的分页代码

<%totalPut=rs.recordcount<br>totalPut=rs.recordcount<br>if currentpage<1 then<br>currentpage=1<br>end if<br>if (currentpage-1)*maxput>totalput then<br>
if (totalPut mod maxput)=0 then<br>
currentpage= totalPut \ maxput<br>
else<br>
currentpage= totalPut \ maxput + 1<br>
end if<br>
<br>end if<br>if currentPage=1 then<br>
<br>else<br>if (currentPage-1)*maxput<totalPut then<br>rs.move (currentPage-1)*maxput<br>bookmark=rs.bookmark<br>else<br>
currentPage=1<br>end if<br>
end if<br>
<br>showContent<br>
<br>rs.close<br>end if<br>
<br>set rs=nothing <br>conn.close<br>set conn=nothing<br>fid=0<br>
%><br>
<br>
<br>
<br>
<br>
<br>
另外 自行设定 sub showcontent的内容 和定义 totalput maxput 。。。等相关变量<br>
<br>
本分页 我所有asp程序都用这个<br>
速度 很快！很经典的分页代码<br>
<br>
最先是 动网文章的分页代码！<br>
被我修改过很多次的了

re:[QUOTE][b]下面引用由[u]霜绛...

<table width=100% bgcolor=#cccccc cellpadding=5 cellspacing=1 class=TBone><tr><td bgcolor=#f7f7f7 class=TBBG9><b>下面引用由<u>霜绛侬馨</u>发表的内容：</b><br>
<br>
哪位大哥想和小妹恋一次呢？<br>
我等你！</td></tr></table><br>啊哈 我<br>

re:[QUOTE][b]下面引用由[u]霜绛...

<table width=100% bgcolor=#cccccc cellpadding=5 cellspacing=1 class=TBone><tr><td bgcolor=#f7f7f7 class=TBBG9><b>下面引用由<u>霜绛侬馨</u>发表的内容：</b><br>
<br>
哪位大哥想和小妹恋一次呢？<br>
我等你！</td></tr></table><br>
作不得声哩<br>

这数据丢失得太严重了啊