香港筲箕湾:ASP分页怎么换行！！下面的代码如何修改

rs.pagesize=30

if rs.Pagecount>1 then

rs.AbsolutePage =page
for i=1 to rs.pagesize

If rs.EOF Then Exit For
response.write rs("name")&"<br>"
rs.MoveNext
If rs.EOF Then Exit For
next

分页代码啊 哎~~ 找个留言本的代码 看他的分页记录如何做的啦

呵呵,一般都是自动换行,不用专门设置,至于位置和换行的位置可以用表格限制,比如调整表格,让它在30页的时候正好开始换行就行了,网页要追求最简洁,重要的是内容.

在 for i=1 to rs.pagecount 与 if i=page then 这两行之间加一行即可：

if (i mod 30)=0 then response.write "<br>"

如果不用表格<tr>循环就用在要换行地方加<br>,

如果要在30页的地方换行：
for i=1 to rs.pagecount
if i=page then
color="red"
response.write"<font color="+color+">"+Cstr(i)+"</font> "
else
color="Black"
response.write"<a href="+url+"?page="+Cstr((i))+"><font color="+color+">"+Cstr(i)+"</font></a> "
end if
if i%30=0 then '新增加的行
Response.Write "<br>" '新增加的行
end if '新增加的行
Next
如果要改成下拉框：
把上面代码改成：
<select name=select1 name=select1 language=javascript onchange="return select1_onchange()">
<%for i=1 to rs.pagecount%>

<option value=<%=url%>?page=<%=i%>>
<%Next%>
</select>
<script>
<!--function select1_onchange(){
if(select1.selectedIndex>=0){
window.navigate(select1(select1.selectedIndex).value);
}}--></script>