77家的会客厅²⁰¹⁰

加快了页面处理速度，不用每次分页码都由服务器去计算，而交由客户的浏览器去处理，当然，如果浏览器关闭了JS支持话，那就惨了，就看不到分页条了。

用JS版的好处还有就是，以后再对站点进一步AJAX化的时候，不存在兼容性问题，并且采用的DOM方式，也不存在浏览器差异，并且这个分页函数也可以拿到任何一种动态网页语言中用，比如说cf或是php。

把原来的ASP版的代码贴出来吧。

'//分页码程式**************************开始
Function PageList(ByVal Page,TotalReCount,PageSize,Url)
Dim TotalPage,StartPage,EndPage,i
Page = Cint(Page)
'//获取总页数
TotalPage = TotalReCount\PageSize
if (TotalReCount Mod PageSize)<>0 then TotalPage=Cint(TotalReCount\PageSize+1)
'//加入URL判断
if Instr(1,Url,"?")=0 then
 Url = Url & "?"
else
 Url = Url & "&amp;"
 Url = replace(Url,"&amp;&amp;","&amp;")
end if%>
   Total:<%=TotalReCount%> | Page:<%=Page &"/"& TotalPage%> | PageSize:<%=PageSize%> |
   <a href="<%=Url%>Page=1" title="NO.1">≮</a>
  <%if (page-5)>0 then%>
   <a href="<%=Url%>Page=<%=Page-5%>" title="PrePara">＜</a>
  <%end if%>
<%
StartPage = Page - 4
EndPage = Page + 4
If StartPage <= 0 Then StartPage = 1
If EndPage > TotalPage Then EndPage = TotalPage
for i = StartPage to EndPage
 if i = page then%>
   <em>[<%=i%>]</em>
 <%else%>
   <a href="<%=Url%>Page=<%=i%>">[<%=i%>]</a>
 <%end if
next%>
  <%if (page+5)<TotalPage then%>
   <a href="<%=Url%>Page=<%=Page + 5%>" title="NextPara">＞</a>
  <%end if%>
   <a href="<%=Url%>Page=<%=TotalPage%>" title="EndNo.">≯</a>
<%End Function
'//***************************************分页码程式结束