Hurtigste måde at tælle poster på

<%
'Skaber forbindelse til databasen
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("database.mdb")


Sql = "SELECT COUNT (Id) AS Total From DINTABEL"
Set Rs = Conn.Execute(Sql)


%>
                          <%= Rs("Total")%>
                          <%  rs.Close
  Conn.Close
  Set rs = Nothing
  Set Conn = Nothing%>

Tusind tak, det var måske også den hurtigste svartid :-)