ASP:怎么用Do....Loop循环函数在得到一张表格
发布网友
发布时间：2022-04-28 23:32
共2个回答
热心网友
时间：2023-09-23 05:33
Set rs = Server.CreateObject ("ADODB.Recordset")
sql = "Select * from text"
rs.Open sql,conn,1,1
Do Until rs.EOF
%>
<tr>
<td><%=..%></td>
<td><%=..%></td>
<td><%=..%></td>
<td><%=..%></td>
<td><%=..%></td>
</tr>
<%
'用这种法有多少条记录就会生成多少行
rs.MoveNext
Loop
end if
rs.close
Set rs = Nothing
conn.close
set conn=Nothing
%>
热心网友
时间：2023-09-23 05:33
Set rs = Server.CreateObject ("ADODB.Recordset")
sql ="Select * from text"
rs.Open sql,conn,1,1
%>
<table>
<tr>
<%
i=1
Do while not rs.EOF
%>
<td><%=rs("text")%></td>
<%if i mod 5=0 then%>
</tr><tr>
<%end if%>
<%
i=i+1
rs.MoveNext
Loop
%>
</tr>
</table>
<%
rs.close
Set rs = Nothing
conn.close
set conn=Nothing
%>
