搜索没找到答案才发的，问题是如何给页码换行？我第一个页已经可以换行了，但是第二页的页码不能换行。

[workey]

第一个页面正常，其他页面例如第二页开始或任意个页面点击后。都是一横排显示页码了。
只有第一页是每个20个页码换行，其他页面都是一个横排。

为什么会这样呢？是不是点击其他页面的时候，循环代码没有执行呀？
html输出是这样的
这个是第一页
<a href='?Page=20'>20</a><br/><a href='?Page=21'>21</a>
这是其他页
<a href='?Page=20'>20</a><a href='?Page=21'>21</a>
-----------------------------------------------------------------------
dim NUM
NUM=1
for i = page1 to page2
if Pagenews = i then
response.write "<a style='color:#FF3366;' href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
else
response.write "<a href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
end if
if NUM mod 20=0 then
response.write "<br />"
end if
NUM=NUM+1
next
----------------------------------------------------------------------
希望能得到答复同时解释下方法，谢谢。

[No_Data_Found]

把 < 换成 <

把 > 换成 >

[workey]

'分页函数
'===========rs.PageSize = 20
'===========PageNews = int(Request.QueryString("page"))
'===========rs.AbsolutePage = PageNews
function DisplayPartPage(PathStr) 'PathStr是路径，后边加&
if PageNews = 0 then PageNews = 1
if PageNews = "" then PageNews = 1
PageC = rs.PageCount
if PageNews > PageC then PageNews = PageC
Dim PageStr,PageStr_2,page1,page2
page1 = 1
page2 = rs.pagecount
if PageNews = 1 and PageC = 1 then
PageStr = ""
elseif PageNews > PageC then
PageStr = "<a href='?"&PathStr&"page=1'><<首页</a>"
elseif PageNews = 1 and PageNews < PageC then
PageStr = "<a href='?"&PathStr&"page="&PageNews+1&"'>下一页></a>"
PageStr = PageStr & "<a href='?"&PathStr&"page="&PageC&"'>尾页>></a>"
dim num
num = 1
for i = page1 to page2
if Pagenews = i then
response.write "<a style='color:#FF3366;' href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
else
response.write "<a href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
end if
if num mod 20 =0 then
response.write"<br/>"
end if
num = num+1
next
elseif PageNews > 1 and PageNews = PageC then
response.write"<a href='?"&PathStr&"page=1'><<首页</a>"
response.write"<a href='?"&PathStr&"page="&PageNews-1&"'><上一页</a>"
for i = page1 to page2
if Pagenews = i then
response.write "<a style='color:#FF3366;' href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
else
response.write "<a href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
end if
next
else
response.write"<a href='?"&PathStr&"page=1'><<首页</a>"
response.write"<a href='?"&PathStr&"page="&PageNews-1&"'><上一页</a>"
for i = page1 to page2
if Pagenews = i then
response.write "<a style='color:#FF3366;' href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
else
response.write "<a href='?"&PathStr&"Page=" & cstr(i) & "'>" & cstr(i) & "</a>"
end if
next
response.write"<a href='?"&PathStr&"page="&PageNews+1&"'>下一页></a>"
response.write"<a href='?"&PathStr&"page="&PageC&"'>尾页>></a>"
End if
PageStr_2 = "<a>共" &rs.recordcount& "条记录 "&rs.PageSize&"条记录/页</a>"
response.write PageStr&PageStr_2
end function

明白了。后面2段for没加代码的原因。

[workey]

谢谢2楼回复，可是不是那个原因。呵呵～