ASP 横向循环2列

来源:百度知道 编辑:UC知道 时间:2024/05/15 19:58:17
<%Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<p align='center'> 还 没 有 任 何 MTV</p>"
else
rs.PageSize=10
Page=CLng(request("Page"))

if Page<1 then Page=1
if Page>rs.PageCount then Page=rs.PageCount
rs.movefirst
rs.absolutepage=Page
%>
<div align="center" style="width: 387; height: 151">

<table width=343 border="0" cellspacing="0" cellpadding="0" bordercolorlight="#000000" bordercolordark="#FFFFFF" height="88">
<center>
<%
for iPage=1 to rs.pagesize
%>
<tr>
<td><%=rs("content")%></td>

</tr>
</center&

table 里面这么改吧:)
<table width=343 border="0" cellspacing="0" cellpadding="0" bordercolorlight="#000000" bordercolordark="#FFFFFF" height="88">
<center>
<%
for iPage=1 to rs.pagesize
%>

<tr>
<td><%=rs("content")%></td>

</tr>
<%
rs.movenext
if rs.eof then %>
<tr>
<td></td>
</tr>
<%exit%>
<%for next %>
<tr>
<td><%=rs("content")%></td>

</tr>
<%
rs.movenext
if rs.eof then exit for next%>
</center>
</table>