<!– #include file="connect.asp" –>
<%
set rs=server.createobject("adodb.recordset") /. rs在connect.asp在有定义
sql="select * from 试卷信息"
rs.open sql,conn,1,1
%>
++++++++++++++ 方法一 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
<table width="245" border="1" bordercolorlight="#c0c0c0" bordercolordark="#ffffff">
<tr>
<%
j=0
do while not rs.eof
j=j+1 %>
<td>
<% =rs("试卷名称")%></td>
<% if (j mod 2=0) and j>=2 then %>
</tr><tr>
<% end if
rs.movenext
loop%></tr>
</table>
++++++++++++++ 方法二 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
<table width="245" border="1" bordercolorlight="#c0c0c0" bordercolordark="#ffffff">
<% do while not rs.eof %>
<tr>
<td><% =rs("试卷名称")%></td>
<%
rs.movenext
k=k+1
if k>5 then exit do
%>
<td><% =rs("试卷名称")%></td></tr>
<%
k=k+1
if k>5 then exit do
rs.movenext
loop%>
</table>
