<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("/data/db1.mdb"))
set rs = Server.CreateObject("ADODB.recordset")
rs.Open "Select * from Persons", conn
%>
<table border="1" width="100%">
<% while not rs.eof %>
<tr>
<td><%=rs("Lastname") %></td><td><%=rs("Firstname") %></td><td><%=rs("Address") %></td><td><%=rs("City") %></td>
</tr>
<% rs.movenext
wend%>
</table>
个人笔记 asp 04 循环读取数据库并用表格显示
最新推荐文章于 2020-03-04 11:07:03 发布