codice:
<%
set conn = server.createObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mapPath("\mdb-database\database1.mdb")
sql = "SELECT * FROM tabella1"
set rs = conn.execute(sql)
if not rs.eof then
%>
<table>
<tr>
<th scope="col">Titolo Campo1</th>
<th scope="col">Titolo Campo2</th>
</tr>
<%
do while not rs.eof
%>
<tr>
<td><%=rs("campo1")%></td>
<td><%=rs("campo2")%></td>
</tr>
<%
rs.moveNext
loop
%>
</table>
<%
end if
rs.close
set rs = nothing
conn.close
set conn = nothing
%>