Tælle ens poster

Jeg bruger dette script til at vise top 100 poster, men jeg vil gerne ha vist resultat efter flest først.

Hvordan gør jeg det?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("skruer.mdb")
strSQL = "SELECT TOP 100 count(skruer) AS ensskruer, skruer FROM skruer GROUP BY skruer ORDER BY skruer"
set rs = Conn.execute(strSQL)



if rs.EOF then
Response.write "Databasen er tom."
else
Do Until rs.EOF

response.write ("<font face=verdana color=000000 size=2>"&RS("ensskruer")&"<br></b></font>")

RS.MoveNext
Loop
end if

Conn.Close
Set Conn = Nothing

%>