我想做到这个效果,就是横向重复2次后换行..显示4条记录!请问这个怎样做!简单点.弄点说明好吗?
<%
        sql = "SELECT * FROM ZJnews ORDER BY postdate desc"   
                     Set rs = Server.CreateObject("ADODB.Recordset")  
                     rs.OPEN sql,Conn,1,1
                     %>
                        

                        
                        
                        
                        

                    <table width="280" height="96" border="0" cellpadding="0" cellspacing="0">
                      <tr>
                        <td width="99" rowspan="3" align="center" valign="middle"><img name="pImg" src='<%="./images/"&rs("picture")%>' width="90" height="90" alt=""></td>
                        <td width="148" height="20" align="center" valign="middle"><%=rs("ZJname")%></td>
                        <td width="33">&nbsp;</td>
                      </tr>
                      <tr>
                        <td height="20" align="center" valign="middle"><%=rs("cbdate")%></td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr>
                        <td align="left" valign="top"><%=rs("jieshao")%></td>
                        <td>&nbsp;</td>
                      </tr>
                    </table>
                    
<%rs.movenext
'loop
rs.close
set rs=nothing
%>

<table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>
        <%
        sql = "SELECT * FROM ZJnews ORDER BY postdate desc"   
        Set rs = Server.CreateObject("ADODB.Recordset")  
        rs.OPEN sql,Conn,1,1
        i=1
        Do While (Not rs.eof)     
        %>
        <table width="280" height="96" border="0" cellpadding="0" cellspacing="0">
        <tr>
            <td width="99" rowspan="3" align="center" valign="middle">
               <img name="pImg" src='<%="./images/"&rs("picture")%>' width="90" height="90" alt=""></td>
            <td width="148" height="20" align="center" valign="middle"><%=rs("ZJname")%></td>
            <td width="33"> </td>
        </tr>
        <tr>
            <td height="20" align="center" valign="middle"><%=rs("cbdate")%></td>
            <td> </td>
        </tr>
        <tr>
            <td align="left" valign="top"><%=rs("jieshao")%></td>
            <td> </td>
        </tr>
        </table>
        <%
        if i mod 2 = 0 then response.write"</tr><tr>"
        i=i+1
        rs.movenext
        'loop
        %>        
    </td>
  </tr>
</table>               
<%
rs.close
set rs=nothing
%>

[[it] 本帖最后由 robinbest 于 2008-6-26 12:41 编辑 [/it]]

好像不行阿.~是竖着来读出的..~咋办?!

<table width="306" border="0" align="center" cellpadding="0" cellspacing="4">
  <tr>
  <%
  num=0
  for i=0 to 5
  %>
    <td width="304">

<table width="140" border="0" align="center" cellpadding="0" cellspacing="2">
  <tr>
    <td width="100" align="center" valign="middle" style="border:#000000 1px solid;"><img src="images/Article_title_icon.gif" width="100" height="100" /></td>
    <td width="20">&nbsp;</td>
  </tr>
  <tr>
    <td height="40" align="center">X-Man</td>
    <td>&nbsp;</td>
  </tr>
</table>

 </td>
 <%
 num=num+1
 if (num mod 3)=0 then
 response.Write("</tr>")
 response.Write("<tr>")
 end if
 %>
 <%
 next
 %>
  </tr>
</table>

自己去修改！