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>