关于n行n列显示数据

<%
set rs = server.createobject("adodb.recordset")

sql = "select * from auto"

rs.open sql,conn,1,1
%>''连接数据库
.....
<table width="494" border="0" align="center" cellpadding="0" cellspacing="0" background="images/title_long1_bg.gif">
  <tr>
    <td height="23" background="images/title_long1.gif">    <span class="style1">奥迪系列</span>
</td>
  </tr>
  <tr>
    <td>
<table  background="images/title_long1_bg.gif" width="468" border="0" align="center" cellpadding="0" cellspacing="0">

<%

i=1
do while not rs.eof
if i mod 4 = 1 then
     response.write "<tr>"
end if
%>
<td>
<table>
<tr>
   <td align="center" width="102" height="65" background="images/pic_bg.gif"><img src="admin/chexing/uploadimages/<%=(rs.Fields.Item("autoimages").Value)%>">
     </td>
   <td width="13" height="65"></td>
   </tr>
<tr align="center">
    <td height="20" width="102"><span class="a2"><%=(rs.Fields.Item("autoname").Value)%></span></td>
    <td height="20" width="13"></td>
  </tr>
</table>
</td>
<%

if i mod 4 =0 then          ''每行四列
     response.write "</tr>"  
end if
rs.movenext
i = i + 1
if i = 5 then i = 1
loop
%>
</table>
</td>
</tr>
<tr>
    <td><img src="images/title_long1_bottom.gif" width="494" height="9"></td>
  </tr>
</table>


引用通告: 查看所有引用 | 我要引用此文章
Tags: 关于n行n列显示数据
收藏到网摘:
评论: 0 | 引用: 0 | 查看次数: -
发表评论
昵 称:
密 码: 游客发言不需要密码.
内 容:
验证码: 验证码
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.