Question

ASP中图片读取，如何换行呢？

<% k=0
sql="select top 10 * from news where ppid=4 and cnflag=1 and tjflag=1 order by editdate desc"
rs.Open sql,cn,1,1
do while not rs.EOF
url=trim(rs("url"))
if url="" then url="news_details.asp?keyno="&keyno&"&id="&rs("id")
%>
<table width="140" border="0" align="left" cellpadding="0" cellspacing="0" style="display:inline">
<tr>
<td><table width="100" border="0" align="center" cellpadding="4" cellspacing="0" class="bodyline">
<tr>
<td><a href="<%=url%>"><img src="../upload/<%=rs("picfilename")%>" width="101" height="94" border="0"></a><a href="<%=url%>"></a></td>
</tr>
</table>
<table width="132" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><a href="<%=url%>" class="grey_B_link"><%=left(rs("title"),18)%></a></td>
</tr>
</table></td>
</tr>
</table>
<%
rs.MoveNext
loop
rs.Close
%>

我想显示4个图片新闻，然后换行，如何改呢？

Answer 1

<% k=0
sql="select top 10 * from news where ppid=4 and cnflag=1 and tjflag=1 order by editdate desc"
rs.Open sql,cn,1,1
%>
<table width="140" border="0" align="left" cellpadding="0" cellspacing="0" style="display:inline">
<tr>
<%
i=0
do while not rs.EOF
url=trim(rs("url"))
if url="" then url="news_details.asp?keyno="&keyno&"&id="&rs("id")
%>

<td>
<table width="100" border="0" align="center" cellpadding="4" cellspacing="0"

class="bodyline">
<tr>
<td><a href="<%=url%>"><img src="../upload/<%=rs("picfilename")%>" width="101" height="94"

border="0"></a><a href="<%=url%>"></a></td>
</tr>
</table>
<table width="132" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><a href="<%=url%>" class="grey_B_link"><%=left(rs("title"),18)%></a></td>
</tr>
</table></td>
<%
i=i+1
if i mod 4=0 then
response.write"</tr>"
end if
rs.MoveNext
loop
rs.Close
%>
</tr>
</table>