<%
sql="select * from serr where order by id asc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<%
for i=1 to rs.recordCount '变量i从1循环到数据庫中的全部记录数
if (i mod 4 =1) then '每个tr显示4个记录,可根据需要自行修改
response.write ""
end if
response.write ""&rs("con")&" "&rs("www")&" "&rs("keyword")&" | "
if (i mod 4 = 0) then
response.write "
"
end if
rs.movenext
next
rs.close
%>