asp分列输出问题

参考一下这个吧！
<%
sql="select * from category_content"

set rs=server.CreateObject("adodb.recordset")
rs.open sql, cnn, 1, 1

sql="select * from big_category"
set rscategory=cnn.execute(sql)

%>
<%
if rs.eof and rs.bof then
response.Write(server.HTMLEncode("暂无记录......"))
response.End()
end if

rs.pagesize=14
page=cint(request.querystring("page"))

'response.Write(page)
'response.End()

if page="" then
page=1
end if

if page<1 then
page=1
end if

if page>rs.pagecount then
page=rs.pagecount
end if
rs.absolutepage=page
%>







<%
i=1
do while not rs.eof and i<=rs.pagesize
%>





<%
i=i+1
rs.movenext
loop
%>

id	title	author
<% =i+(page-1)*pagesize %>	&tid=<%=rs("categoryid")%>"> <% if Len(rs("newsTitle"))>28 then %> <% =Left(server.HTMLEncode(rs("newsTitle")),28)&"…"%> <% else %> <% =server.HTMLEncode(rs("newsTitle"))%> <% end if %>	<% if Len(rs("author"))>8 then %> <% Response.Write Left(server.HTMLEncode(rs("author")),8)&"..."%> <% else %> <% =server.HTMLEncode(rs("author"))%> <% end if %>
		全选:
<% if page=1 then %> 首页 上一页 <% else %> 首页 上一页 <% end if %> <% if page=rs.pagecount then %> 下一页 尾页 <% else %> 下一页 尾页 第<% =page%>页/共<% =rs.pageCount%>页

我咋看着你这个很复杂呢，
<%
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from news order by id desc",conn,1,1
if rs.eof and rs.bof then
response.Write"记录为空"
else
i=0
%>


<%
do while not rs.eof
i=i+1
%>

<%if i mod 2=0 then response.Write""%>
<%
rs.movenext
loop
end if
rs.close
%>

<%=rs("name")%>

只需要把分页写上就好了，如果有问题找我442636266

都没看懂呢