个人笔记 asp 04 循环读取数据库并用表格显示

<%
	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>