set connect = server.createobject("adodb.connection")
connect.open "dsn"
sql = "select count(bokstav) as antal,bokstav from dintabell group by bokstav order by bokstav"
set rs = connect.execute(sql)
while not rs.eof
response.write "Bokstaven " & rs("bokstav") & " finns " & rs("antal") & " gånger<br>"
rs.movenext
wend
rs.close
connect.close
------------------
essentitia preter non sans multiplicandum