Problem Igen :(

De viser alle bruger selvom jeg skriver select fra top 10 ???
                          <%
\' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"database.mdb\")
Conn.Open DSN

strSQL = \"Select top 10 * From bruger Order by dato Desc\"
Set rs = Conn.Execute(strSQL)

Do
  strNavn = rs(\"Navn\")

  strLink = \"<a href=\'showuser.asp?id=\" & rs(\"Id\") & \"\'>\" & strNavn & \"</a>\"

  Response.Write \"<li>\" & strLink & \"</li>\"

  rs.MoveNext
Loop While Not rs.EOF

Conn.Close
Set Conn = Nothing
%>