asp分页代码该怎么改
高手打开这个网站:http://www.memodisk.com/products.asp,看看右下角的,原来是四页,现在要更新产品到七页,代码不知道怎么该。四页的代码是...
高手打开这个网站:http://www.memodisk.com/products.asp,看看右下角的,原来是四页,现在要更新产品到七页,代码不知道怎么该。四页的代码是: Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset1.MoveNext()
Wend
%>
</table>
</div>
<div class="fenye">pages <A HREF="<%=MM_moveFirst%>">1</A> <A HREF="<%=MM_moveNext%>">2</A> <A HREF="<%=MM_movePrev%>">3</A> <A HREF="<%=MM_moveLast%>">4</A></div>
向高手请教如何改成七页的,我是新手,真诚求教!
ctm1688这位师傅改的这个好是好,但我在本地测试了一下,总页数显示为-1,如何让总页数显示为7,还有当前页也显示不正确,该如何再改一下 展开
Repeat1__numRows=Repeat1__numRows-1
Recordset1.MoveNext()
Wend
%>
</table>
</div>
<div class="fenye">pages <A HREF="<%=MM_moveFirst%>">1</A> <A HREF="<%=MM_moveNext%>">2</A> <A HREF="<%=MM_movePrev%>">3</A> <A HREF="<%=MM_moveLast%>">4</A></div>
向高手请教如何改成七页的,我是新手,真诚求教!
ctm1688这位师傅改的这个好是好,但我在本地测试了一下,总页数显示为-1,如何让总页数显示为7,还有当前页也显示不正确,该如何再改一下 展开
4个回答
展开全部
百度hi我
<table border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="center" valign="top">
<td width="68" align="center">
<%if page=1 or page<1 then%>
First Prev
<%end if%>
<%if page>1 then%>
<a href="<%=dizhi%>Page=1">First</a> <a href="<%=dizhi%>Page=<%=page-1%>">Prev</a>
<%end if%>
</td>
<%
if page>1 then a=1
if page>2 then a=2
if page>3 then a=3
if page>4 then a=4
'当前页面前,循环显示4页
for i=page-a to page-1 %>
<td width="16" align="center">
<a href="<%=dizhi%>Page=<%=i%>"><%=i%></a>
</td>
<% next %>
<td width="16" align="center">
<font color="#FF0000"><%=page%></font>
</td>
<%
for i=page+1 to page+4
if i>rs.PageCount then exit for
%>
<td width="16" align="center">
<a href="<%=dizhi%>Page=<%=i%>"><%=i%></a>
</td>
<%
next
%>
<td width="68" align="center">
<% if page=rs.PageCount or page>rs.PageCount then %>Next Last<% else %><a href="<%=dizhi%>Page=<%=page+1%>"><span class="style1">Next</span></a> <a href="<%=dizhi%>Page=<%=rs.PageCount%>">Last</a>
<% end if %>
</td><td width="200" align="center">
RecordCount:<%=rs.recordcount%> Pages:<%=page%>
</td>
</tr>
</table>
<table border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="center" valign="top">
<td width="68" align="center">
<%if page=1 or page<1 then%>
First Prev
<%end if%>
<%if page>1 then%>
<a href="<%=dizhi%>Page=1">First</a> <a href="<%=dizhi%>Page=<%=page-1%>">Prev</a>
<%end if%>
</td>
<%
if page>1 then a=1
if page>2 then a=2
if page>3 then a=3
if page>4 then a=4
'当前页面前,循环显示4页
for i=page-a to page-1 %>
<td width="16" align="center">
<a href="<%=dizhi%>Page=<%=i%>"><%=i%></a>
</td>
<% next %>
<td width="16" align="center">
<font color="#FF0000"><%=page%></font>
</td>
<%
for i=page+1 to page+4
if i>rs.PageCount then exit for
%>
<td width="16" align="center">
<a href="<%=dizhi%>Page=<%=i%>"><%=i%></a>
</td>
<%
next
%>
<td width="68" align="center">
<% if page=rs.PageCount or page>rs.PageCount then %>Next Last<% else %><a href="<%=dizhi%>Page=<%=page+1%>"><span class="style1">Next</span></a> <a href="<%=dizhi%>Page=<%=rs.PageCount%>">Last</a>
<% end if %>
</td><td width="200" align="center">
RecordCount:<%=rs.recordcount%> Pages:<%=page%>
</td>
</tr>
</table>
展开全部
你这个代码没有问题呀,我做了部分修改,运行起来 后 显示
那样吧,我现在来修改下吧:
页数:共<%
mmPageCount = 0
if MM_rsCount mod MM_size = 0 then
mmPageCount = MM_rsCount / MM_size
else
mmPageCount = MM_rsCount \ MM_size + 1
end if
Response.Write mmPageCount
%>页,当前页:<%
if MM_offset = 0 then
Response.Write "1"
elseif MM_offset = -1 then
Response.Write mmPageCount
else
Response.Write MM_offset / MM_size
end if
%>,共<%=(MM_rsCount)%>条记录,
<% If MM_offset <> 0 Then %>
<a href="<%=MM_moveFirst%>">第一页</a>
<% End If ' end MM_offset <> 0 %>
<% If MM_offset <> 0 Then %>
<a href="<%=MM_movePrev%>">前一页</a>
<% End If ' end MM_offset <> 0 %>
<% If Not MM_atTotal Then %>
<a href="<%=MM_moveNext%>">下一页</a>
<% End If ' end Not MM_atTotal %>
<% If Not MM_atTotal Then %>
<a href="<%=MM_moveLast%>">尾 页</a>
<% End If ' end Not MM_atTotal %>
运行后:
页数:共7页,当前页:3,共xx条记录, 首页 下一页 前一页 尾页
那样吧,我现在来修改下吧:
页数:共<%
mmPageCount = 0
if MM_rsCount mod MM_size = 0 then
mmPageCount = MM_rsCount / MM_size
else
mmPageCount = MM_rsCount \ MM_size + 1
end if
Response.Write mmPageCount
%>页,当前页:<%
if MM_offset = 0 then
Response.Write "1"
elseif MM_offset = -1 then
Response.Write mmPageCount
else
Response.Write MM_offset / MM_size
end if
%>,共<%=(MM_rsCount)%>条记录,
<% If MM_offset <> 0 Then %>
<a href="<%=MM_moveFirst%>">第一页</a>
<% End If ' end MM_offset <> 0 %>
<% If MM_offset <> 0 Then %>
<a href="<%=MM_movePrev%>">前一页</a>
<% End If ' end MM_offset <> 0 %>
<% If Not MM_atTotal Then %>
<a href="<%=MM_moveNext%>">下一页</a>
<% End If ' end Not MM_atTotal %>
<% If Not MM_atTotal Then %>
<a href="<%=MM_moveLast%>">尾 页</a>
<% End If ' end Not MM_atTotal %>
运行后:
页数:共7页,当前页:3,共xx条记录, 首页 下一页 前一页 尾页
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
数据库连接串,有一种,打开以后,分页就显示-1,你换一种,用provider=....;data source=...这个形式的,它的分页就是正常的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这个问题不是很难吧
发你的代码过来我帮你瞧瞧。
发你的代码过来我帮你瞧瞧。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询