<%
set rs=server.createobject("adodb.recordset")
sql="select * from Info order by dateandtime desc"
rs.open sql,conn
if not rs.eof then
do while not rs.eof
%>
<td><%=rs("info_id")%></td>
<%
m=m+1
if m mod 2=0 then //将m改为3就是每行3个,依次类推
response.write "</tr>"
end if
rs.movenext
loop
end if
rs.close
%>
</table>
</body>
</html>
<%
while not adrs.eof
response.write "你想输入的东东"
response.Write " </td>" & vbnewline
f=f+1
adrs.movenext
response.write "<td>"
if f mod 3=0 then response.write "</tr><tr><td>"
wend
end if
adrs.close
set adrs = nothing %>