asp,css 关于块级元素与内联元素的问题。。几张从数据库读取的图片自动换行排列起来,想把它弄成行着排列
<tablewidth="750"border="1"cellpadding="0"cellspacing="0"><tr><%strsql="select*frompr...
<table width="750" border="1" cellpadding="0" cellspacing="0" >
<tr>
<% strsql="select * from pro_list where c_code like '012%'"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 1
'response.Write(rs.recordcount&".."):response.End()
if not rs.eof then
response.write "查询到记录,请稍后。。。"
'检测是否上传了小图片,如果没上传,则显示大图片
if rs("pro_img")<>"" then
img=trim(rs("pro_img"))
else
img=trim(rs("pro_small_img"))
end if
if img<>"" then
img=img&"|"
imgUrl=imgUrl&img
end if
if imgUrl<>"" then
imgUrl=left(imgUrl,len(imgUrl)-1)
end if
i=1
do while not rs.eof %>
<td height="110" valign="top"><table width="160" height="130" border="1" cellpadding="0" cellspacing="0" >
<tr>
<td width="150" height="95">
<table width="140" height="140" border="1" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td bgcolor="#ffffff" align="center"><a href="#"><img src="<%=trim(rs("pro_img"))%>" width="85" height="82" border="1" /></a></td>
</tr>
</table>
</td>
</tr>
</table></td>
</tr>
</table></td>
<%if i mod 4 = 0 then %>
</tr>
<%end if
rs.movenext
i=i+1
loop
rs.close
end if
%>
</table> 展开
<tr>
<% strsql="select * from pro_list where c_code like '012%'"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 1
'response.Write(rs.recordcount&".."):response.End()
if not rs.eof then
response.write "查询到记录,请稍后。。。"
'检测是否上传了小图片,如果没上传,则显示大图片
if rs("pro_img")<>"" then
img=trim(rs("pro_img"))
else
img=trim(rs("pro_small_img"))
end if
if img<>"" then
img=img&"|"
imgUrl=imgUrl&img
end if
if imgUrl<>"" then
imgUrl=left(imgUrl,len(imgUrl)-1)
end if
i=1
do while not rs.eof %>
<td height="110" valign="top"><table width="160" height="130" border="1" cellpadding="0" cellspacing="0" >
<tr>
<td width="150" height="95">
<table width="140" height="140" border="1" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td bgcolor="#ffffff" align="center"><a href="#"><img src="<%=trim(rs("pro_img"))%>" width="85" height="82" border="1" /></a></td>
</tr>
</table>
</td>
</tr>
</table></td>
</tr>
</table></td>
<%if i mod 4 = 0 then %>
</tr>
<%end if
rs.movenext
i=i+1
loop
rs.close
end if
%>
</table> 展开
1个回答
展开全部
呵,你这个方法极其不对,图片排列横竖与否,不是用表格来控制的,需用css。给你改一下,请试一下:
/*图片整个区域的宽度,就修改这里的360px*/
<div style="width:360px; padding:7px;">
<%
'请养成定义变量的习惯
dim strsql
strsql="select * from pro_list where c_code like '012%'"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 1
if not rs.eof then
response.write "查询到记录,请稍后。。。"
'检测是否上传了小图片,如果没上传,则显示大图片
if rs("pro_img")<>"" then
img=trim(rs("pro_img"))
else
img=trim(rs("pro_small_img"))
end if
if img<>"" then
img=img&"|"
imgUrl=imgUrl&img
end if
if imgUrl<>"" then
imgUrl=left(imgUrl,len(imgUrl)-1)
end if
i=1
do while not rs.eof
'意思是将每一个图片挨个放在div中,margin-right:10px,margin-bottom:10px;是图片右边和底部的间距,可以试着修改,还可以试着修改img中style关于图片宽和高(此处是'width:85px;height:82px;)的定义,以满足需求。
'当图片靠到外层div的边界,即360框定的边界时,自动会换行,你要做的就是反复修改图片右边和底部的间距即可
'另外,所有的style风格应该都写在css文件中
response.write "<a href=''><img src='"&trim(rs("pro_img"))&"' style='width:85px;height:82px;margin-right:10px; margin-bottom:10px;' />"
rs.movenext
i=i+1
loop
rs.close : set rs = nothing '释放资源
end if
%>
</div>
/*图片整个区域的宽度,就修改这里的360px*/
<div style="width:360px; padding:7px;">
<%
'请养成定义变量的习惯
dim strsql
strsql="select * from pro_list where c_code like '012%'"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 1
if not rs.eof then
response.write "查询到记录,请稍后。。。"
'检测是否上传了小图片,如果没上传,则显示大图片
if rs("pro_img")<>"" then
img=trim(rs("pro_img"))
else
img=trim(rs("pro_small_img"))
end if
if img<>"" then
img=img&"|"
imgUrl=imgUrl&img
end if
if imgUrl<>"" then
imgUrl=left(imgUrl,len(imgUrl)-1)
end if
i=1
do while not rs.eof
'意思是将每一个图片挨个放在div中,margin-right:10px,margin-bottom:10px;是图片右边和底部的间距,可以试着修改,还可以试着修改img中style关于图片宽和高(此处是'width:85px;height:82px;)的定义,以满足需求。
'当图片靠到外层div的边界,即360框定的边界时,自动会换行,你要做的就是反复修改图片右边和底部的间距即可
'另外,所有的style风格应该都写在css文件中
response.write "<a href=''><img src='"&trim(rs("pro_img"))&"' style='width:85px;height:82px;margin-right:10px; margin-bottom:10px;' />"
rs.movenext
i=i+1
loop
rs.close : set rs = nothing '释放资源
end if
%>
</div>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询