asp 橫排顯示資料

複製代碼 代碼如下:<%
sql="select * from serr where order by id asc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%><style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
-->
</style>
<table width=""100%"" align='center'>
<%
for i=1 to rs.recordCount '變數i從1迴圈到資料庫中的全部記錄數
if (i mod 4 =1) then '每個tr顯示4個記錄,可根據需要自行修改
response.write "<tr>"
end if
response.write "<td width=200>"&rs("title")&"<br>"&rs("con")&"<br>"&rs("www")&"<br>"&rs("keyword")&"</td>"
if (i mod 4 = 0) then
response.write "</tr>"
end if
rs.movenext
next
rs.close
%>
</table>