Top 10 liste

Du kan lave det sådan her:

sql = "select count(Anbefalinger.Sted_ID) as antalAnbefalinger, titel from Steder left join Anbefalinger on Steder.id = Anbefalinger.Sted_ID order by count(Anbefalinger.Sted_ID) desc"


Så har du en top liste sådan her:

sql = "select count(Anbefalinger.Sted_ID) as antalAnbefalinger, titel from Steder left join Anbefalinger on Steder.id = Anbefalinger.Sted_ID order by count(Anbefalinger.Sted_ID) desc"

Set rs = Conn.Execute(sql)
do while not rs.EOF
  Response.Write rs("titel") & " antal anbefalinger " & rs("antalAnbefalinger")

  rs.Movenext
loop

vil du kun havde de første 10 ud kan du tøje top 10 sådan her:

sql = "select top 10 count(Anbefalinger.Sted_ID) as antalAnbefalinger, titel from Steder left join Anbefalinger on Steder.id = Anbefalinger.Sted_ID order by count(Anbefalinger.Sted_ID) desc, Steder.id desc"



sql sætningen skulle virke med Access nruger du mysql skal den rettes lidt.

jeg bruger access - men får følgende fejl :

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] You tried to execute a query that does not include the specified expression 'titel' as part of an aggregate function.

/vips.asp, line 56

Fejlen sker med linien med hvor den executer

Hedder din kolonne ikke titel?

men prøv lige sådan her, hvis den brokker sig over titel:

sql = "select count(Anbefalinger.Sted_ID) as antalAnbefalinger, [titel] from Steder left join Anbefalinger on Steder.id = Anbefalinger.Sted_ID order by count(Anbefalinger.Sted_ID) desc"

suk - den brokker sig over det samme..

doh jeg har også glemt group by delen prøv live sådan her:

sql = "select count(Anbefalinger.Sted_ID) as antalAnbefalinger, [titel] from Steder left join Anbefalinger on Steder.id = Anbefalinger.Sted_ID group by [titel] order by count(Anbefalinger.Sted_ID) desc"

Det hjalp :-p