求助ASP+ACCESS控制显示数据量 - 编程论坛

#2

jamesxiaoyao2008-12-12 13:51

可以写个判断，比如 I MOD N 然后输出个换行

#3

孤独冷雨2008-12-12 14:02

<table width="980" border="0" cellspacing="0" cellpadding="0">
     <%
     set rs=server.CreateObject("adodb.recordset")
     sql="select * from yqlj order by id desc"
     rs.open sql,connstr,1,1
      if rs.eof and rs.bof then
          response.Write "<tr><td align='center' height='40'>暂无内容</td></tr>"
          else
          for i=1 to rs.recordcount
     %>
      <tr>
        <td align="left" valign="middle">
        <table width="960" border="0" cellspacing="0" cellpadding="0">

          <tr><% for j=1 to 4 %>
            <td width="120" height="44" align="center" valign="middle"><a href="<%=rs("url")%>" target="_blank"><img src="<%=rs("pic")%>" width="88" height="31" border="0" alt="<%=rs("dw")%>" /></a></td>
            <%
          rs.movenext
          if rs.eof then exit for
          next

          %>
          </tr>

        </table></td>
      </tr>
      <%
      if rs.eof then exit for
            next
            end if
            rs.close


      %>
    </table>

#4

kira0072008-12-12 15:41

set rs=conn.execute("select username from [user] ")
i=1
do while not rs.eof

if i mod 4=0 then
TXTstr=TXTstr&rs("username")&"<br>"
else
TXTstr=TXTstr&rs("username")&"/"
end if

i=i+1
rs.movenext
loop
rs.close
set rs=nothing

response.write TXTstr