sql = "Select citta, count(*) AS total From registrazione_utente Group By citta Order by 2 Desc"

...

Do While Not rs.Eof
response.write( rs( "citta" ) & " " & rs( "total" ) )
rs.MoveNext
Loop

...