准备工作 Jquery-man.js
需要分页位置
<脚本语言=javascript>
函数检查页面（页）{
$(#plShow).load(plAjax.asp?ID=<%=news_id%>&p=+pages);
}
</脚本>
<div id=plShow>
<脚本语言=javascript>
$(#plShow).load(plAjax.asp?ID=<%=news_id%>);
</脚本>
</div>
<%
’好了，就这么简单……
%>
plAjax.asp显示分页
<!--#include file=inc/conn.asp-->
<%
ID = 请求.QueryString(ID)
如果 ID = 或 isnull(ID) 那么
响应.End()
结束如果
P = 请求.QueryString(p)
如果 P = 或 isnull(P) 则
P = 1
结束如果
如果 P = 1 那么
sql = 选择前 5 个 * from pl where byID='&ID&' order by id desc
别的
pz = 5*(P-1)
sql = select top 5 * from pl where id not in(select top &pz& id from pl where byID='&ID&' order by id desc) and byID='&ID&' order by id desc
结束如果
响应.Charset=gb2312
设置 rs = conn.execute(sql)
如果 rs.eof 那么
response.Write <dl><dt style='color:#FF0000'>暂无评论！</dt></dl>
响应.End()
结束如果
而不是 rs.eof
%>
<dl>
<dt><img src=Image/page/face/<%=rs(face)%>.png />
<%
如果 rs(isShow) 那么
回复.写游客
别的
响应.Write rs(name)
结束如果
%>
<%=rs(adddate)%> 发表
</dt>
<dt><%=rs(内容)%></dt>
</dl>
<%
rs.movenext
文德
rs.close
%>
<div样式=高度:40px;>
<ul class=页面样式=margin-top:20px;>
<%
'这里采用了仿百度分页效果
sql = 从 pl 中选择 count(*) 作为 maxnum，其中 byID='&ID&'
rs = conn.execute(sql)
最大数 = rs(最大数)
如果 maxnum mod 5 那么
页数 = int(maxnum/5)+1
别的
页数 = 最大页数/5
结束如果
如果 P = 1 或 P<1 那么
response.Write <li>首页</li><li>主页</li>
别的
response.Write <li><a href='javascript:void(0);' onclick='CheckPage(1)'>首页</a></li><li><a href='javascript:void(0);' onclick='CheckPage(&P-1&)'>上页</a></li>
结束如果
如果 P>1 则 a=1
如果 P>2 则 a=2
如果 P>3 则 a=3
如果 P>4 则 a=4
如果 P>5 则 a=4
对于 i=(Pa) 至 P-1
response.Write <li class='dpage'><a href='javascript:void(0);' onclick='CheckPage(&i&)'>&i&</a></li>
下一个
响应.Write <li>&P&</li>
对于 j=(P+1) 至 (P+5)
如果 j>pageCount 那么
退出
结束如果
response.Write <li class='dpage'><a href='javascript:void(0);' onclick='CheckPage(&j&)'>&j&</a></li>
下一个
如果 int(P) = int(pageCount) 或 int(pageCount) = 0 那么
response.Write <li>下页</li><li>尾页</li>
别的
response.Write <li><a href='javascript:void(0);' onclick='CheckPage(&P+1&)'>下页</a></li><li><a href='javascript:void(0);' onclick='CheckPage(&pageCount&)'>尾页</a></li>
结束如果
%>
</ul>
</div>
' 款式表
。页{
宽度：自动；高度：16px；
}
.李页{
显示：内嵌；高度：16px；行高：16px；左内边距：6px；文本对齐：居中；左边距：5px；右内边距：5px
}
.页.d页{
边框：1px #D6D6D6 实心；背景：#F7F7F7；字体粗细：粗体；
}
#pl显示 dl{
高度：自动；边框底部：1px #D6D6D6 虚线；顶部边距：8px；明确：两者；宽度：95%；
}
#pl显示 dt{
高度：24px；文本对齐：左对齐；行高：24px；颜色：#666；
}