UC知道图片如何横向显示5张（急！！！）
来源：百度知道 编辑：UC知道 时间：2024/06/07 15:07:41
这是竖着排列图片的，如何改动变成横向显示图片呀，谢谢！
<table width="97" height="180" border="0" align="center" cellpadding="0" cellspacing="0">
<%
Set rs3= Server.CreateObject("ADODB.Recordset")
sql="select top 5 * from dcrw order by ID Desc"
rs3.open sql,conn,1,3
do while not rs3.eof
%>
<tr>
<td width="97" height="136"><%if rs3("images")<>"" then%>
<img src="<%=rs3("images")%>" width="80" height="100" alt="">
<%end if%></td>
</tr>
<tr>
<table width="97" height="180" border="0" align="center" cellpadding="0" cellspacing="0">
<%
Set rs3= Server.CreateObject("ADODB.Recordset")
sql="select top 5 * from dcrw order by ID Desc"
rs3.open sql,conn,1,3
do while not rs3.eof
%>
<tr>
<td width="97" height="136"><%if rs3("images")<>"" then%>
<img src="<%=rs3("images")%>" width="80" height="100" alt="">
<%end if%></td>
</tr>
<tr>
<%
怎样输出每行 5 个
假设你前面已经打开了一个 rs
response.write "<table>"
dim i, j
i = 1
do while not rs.eof
j = i mod 5
if j = 1 then response.write "<tr>"
response.write "<td><img src=" & rs("图片地址") & "></td>"
if j = 0 then response.write "</tr>"
i = i + 1
rs.movenext
loop
if (i mod 5) <> 1 then
for j = 0 to ((6 - i) mod 5)
response.write "<td> </td>"
next
end if
试试