Resultat udskrevet i en tabel?

Sådan kan det gøres:
<%

Dim cnnSimple 
Dim rstSimple
Dim strDBPath

strDBPath = Server.MapPath("db_scratch.mdb")


Set cnnSimple = Server.CreateObject("ADODB.Connection")


cnnSimple.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";"

Set rstSimple = cnnSimple.Execute("SELECT * FROM tblMIN")

%>
<table border="1">
<%
Do While Not rstSimple.EOF
    %>
    <tr>
        <td><%= rstSimple.Fields("id").Value %></td>
        <td><%= rstSimple.Fields("text_field").Value %></td>
        <td><%= rstSimple.Fields("integer_field").Value %></td>
        <td><%= rstSimple.Fields("date_time_field").Value %></td>
    </tr>
    <%
    rstSimple.MoveNext
Loop
%>
</table>
<%

rstSimple.Close
Set rstSimple = Nothing
cnnSimple.Close
Set cnnSimple = Nothing
%>

Jeg kunne ikke lige få det til at birke sådan som du skriver, men jeg fik idéen til noget andet, og nu virker det. Svar hvis du vil have point!

Tak, men var det ikke det du vil?