Question

asp高手进 图片的循环问题

本人程序菜鸟中的菜鸟，以下代码是从左到右排列10张，怎么让图片一排4张 到4张另起一行。然后显示成4 到5排就行
<table cellpadding="0" align="center" border="0" cellspace="0">
<tr>
<% set rs=server.createobject("adodb.recordset")
sql="select top 10 * from newslist where n_pid=69 and n_ppid=377 order by num desc"
rs.open sql,conn,1,1
if not (rs.eof and rs.bof) then
do while not rs.eof
%>
<td align="center" style="padding-left:15px; line-height:23px; font-size:12px;" valign="top"><a href="tu_content.asp?n_id=<%=rs("n_id")%>"><img src="../<%=right(rs("pic1"),len(rs("pic1"))-3)%>"border="0" style="BORder:1px solid #cccccc; padding:3px;"/ width="150" height="100" /><br />
<%=rs("n_title")%></a></td>
<%
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</tr>
</table>
我朋友帮忙给我改好了 但依然谢谢你
正确的是<table cellpadding="0" align="center" border="0" cellspace="0">
<tr>
<%
set rs=server.createobject("adodb.recordset")
sql="select top 10 * from newslist where n_pid=69 and n_ppid=377 order by num desc"
rs.open sql,conn,1,1
if not (rs.eof and rs.bof) then
Row=1
do while not rs.eof
%>
<td align="center" style="padding-left:15px; line-height:23px; font-size:12px;" valign="top"><a href="tu_content.asp?n_id=<%=rs("n_id")%>"><img src="../<%=right(rs("pic1"),len(rs("pic1"))-3)%>"border="0" style="BORder:1px solid #cccccc; padding:3px;"/ width="150" height="100" /><br />
<%=rs("n_title")%></a></td>
<%
If Row Mod 4=0 Then
Response.Write("</tr><tr>")
end if
Row=Row+1
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</tr>
</table>

Answer 1

我没测试，但方法就是这样的，希望对你有帮助！
<table cellpadding="0" align="center" border="0" cellspace="0">
<tr>
<%
set rs=server.createobject("adodb.recordset")
sql="select top 10 * from newslist where n_pid=69 and n_ppid=377 order by num desc"
rs.open sql,conn,1,1
if not (rs.eof and rs.bof) then
Row=1
do while not rs.eof
If Row Mod 4=0 Then
Response.Write("</tr><tr>")
Else
%>
<td align="center" style="padding-left:15px; line-height:23px; font-size:12px;" valign="top"><a href="tu_content.asp?n_id=<%=rs("n_id")%>"><img src="../<%=right(rs("pic1"),len(rs("pic1"))-3)%>"border="0" style="BORder:1px solid #cccccc; padding:3px;"/ width="150" height="100" /><br />
<%=rs("n_title")%></a></td>
<%
End If
Row=Row+1
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</tr>
</table>