Sortera och räkna

Är kanske inte den bästa lösningen men den bör fungera..

<%
Set ConnObj=Server.CreateObject("ADODB.Connection")
ConnObj.Open "DBQ=c:\inetpub\scripts\din_DB.mdb;DRIVER=Microsoft Access Driver (*.mdb)"

SQL = "Select Distinct(Nick) from Senaste ORDER BY Nick ASC"
Set Rs = ConnObj.Execute(SQL)
Do Until Rs.EOF
	
	CountSQL = "Select Count(*) AS nCount from Senaste Where Nick = '"& Rs("Nick") &"'"
	Set Rs2 = ConnObj.Execute(CountSQL)
	Do Until Rs2.EOF
	
		Response.write Rs("Nick") & "(" & Rs2("nCount") & ")"
		
	Rs2.MoveNext
	Loop
	
Rs.MoveNext
Loop
ConnObj.Close
%>

Du kan skriva det där med en öppning bara.
Såhär: (där Connect är ditt databasobjekt)

SQL = "SELECT Nick,Meddelande,datumet,COUNT(*) AS antal FROM Senaste GROUP BY Nick"
Set RS = Connect.Execute(SQL)
	Do Until RS.EOF
		Response.write RS("Nick") & "(" & RS("antal") & ")<br>"
	RS.MoveNext
	Loop
Set RS = Nothing

-Eitraz

Tack!

Det första exemplet fungerade perfekt!

Det andra exemplet gav följande felmeddelande:

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

Det är just det där med Distinct.. Vad gör det egentligen?
Det sorterar bort dubletter eller?

Vissa poster förekommer två gånger ändå iofs..

Verkar inte som du har nåt fält som heter Meddelande kanske?

Enda som behövs i mitt uttryck är väll igentligen
Nick,COUNT(*) AS antal

-Eitraz

Problem igen... :-(

Om jag försöker med:

SQL = "Select Distinct(Nick) from Senaste ORDER BY ID ASC"

Så får jag felmeddelande:

[Microsoft][ODBC Microsoft Access Driver] ORDER BY clause (id) conflicts with DISTINCT.

Eitraz:
Fältet Meddelande finns.

Hur kan man sortera detta efter Id, Nick och datum?
Har även ett fält som heter Datumet.

SQL = "Select Distinct(Nick),ID from Senaste ORDER BY ID ASC"
måste det väll bli isåfall?

-Eitraz

Blir väldigt konstiga resultat av det där. Samma data kommer flera gånger i rad. Plus att sidan blir otroligt trögladdad.

på min:
SQL = "SELECT ID,Nick,COUNT(*) AS antal FROM Senaste GROUP BY nick ORDER BY ID"

Men jag förstår inte varför du ska ordna efter ID när det är olika för samma namn.. eller?

-Eitraz

SQL = "SELECT Nick,COUNT(*) AS antal FROM Senaste GROUP BY Nick"

Om man använder group by så måste alla kolumner i select-listan ingå antingen i en aggregatfunktion eller finnas med i group by. Det har alla dbms-tillverkare utom Mysql förstått.

Distinct är ingen funktion. Den appliceras alltid på alla kolumner i resultatet.

Du kan sortera efter namn

SQL = "SELECT Nick,COUNT(*) AS antal FROM Senaste GROUP BY Nick order by nick"

eller antal

SQL = "SELECT Nick,COUNT(*) AS antal FROM Senaste GROUP BY 2 desc"

Jag vill ju ordna så att den som senast gjorde en post kommer överst i listan.

Medans någon som kanske inte postat på två månader hamnar längst ner.

Sortera efter sista postning

SQL = "SELECT Nick,COUNT(*),max(datePosted) AS antal FROM Senaste GROUP BY Nick order by 3 desc"

LarsG:
Funkade kanon!
Men då försvann räkningen av Meddelande.. :-(

Datumfältet heter Datumet. Ändrade datePosted till det.

AS antal
ska ligga efter COUNT(*)

-Eitraz

Nu börjar jag känna mig riktigt besvärlig.. :-)

men du har fått ordning på det nu va? ;)

-Eitraz

LarsG:
Vad är det som händer vid order by 3 desc?

Och sortera efter antal på order by 2 desc?

Hur vet den vad som ska sorteras där egentligen?

Nick,COUNT(*),max(datePosted)
 (1)   (2)          (3)

:D

-Eitraz