准备工作 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;
}