Gegevens uit een query en tabel ophalen

[huijb]

Met onderstaande code haal ik gegevens uit een query en tabel van een Access bestand.

<%

set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "C:/Inetpub/Databases/Analyses.mdb"

set rs=Server.CreateObject("ADODB.recordset")
rs.Open "SELECT QueInvoer.IDInvoer, QueInvoer.Datum, QueInvoer.Naam, tblTaken.TaakNaam FROM QueInvoer, tblTaken", conn

%>
<table border="1" width="50%" cellspacing="8">
  <tr>
  <%for each x in rs.Fields
    response.write("<th>" & x.name & "</th>")
  next%>
  </tr>
  <%do until rs.EOF%>
    <tr>
    <%for each x in rs.Fields%>
      <td><%Response.Write(x.value)%></td>
    <%next
    rs.MoveNext%>
    </tr>
  <%loop
  rs.close
  conn.close
  %>
</table>

Er zit ergens een hikje omdat het een eeuwigheid duurt voordat de pagina ververst wordt. Haal ik het bv. alleen uit de query dan gaat het vliegensvlug. Ik doe dus iets niet goed, maar wat?