Tjo!

Har en elevdatabas i access till en inloggningssite för en intern sida. Jag har en sida som listar alla användare, men idag listar den på efternamn, vilket fungerar skapligt. Dock är det ju lite jobbigt att se en enda röra av klass och namn, så jag skulle vilja gruppera klasserna men sortera på namn.

Jag försökte med funktionen GROUP BY, men är osäker på om det är rätt funtkion att använda sig av.

Den kodraden jag använde mig av för koppling mot databasen är: "SELECT * from login WHERE user='elev' GROUP BY klass ORDER BY efternamn"

Logiskt tyckte jag; men icke :)

Hur får jag sidan att lista det som jag vill ha....

Ett exempel på hur du kan lösa det:

<%
Dim rs
Dim con
Dim LastKlass

    Set con = CreateObject("ADODB.Connection")
    con.Open Application("ConnectionString")

    Set rs= CreateObject("ADODB.Recordset")
    rs.Open "SELECT *" + vbCrLf + _
            "FROM login" + vbCrLf + _
            "WHERE user='elev'" + vbCrLf + _
            "ORDER BY klass, efternamn", con

    Do Until rs.EOF
        If LastKlass = rs("klass") Then
        Else
            'Här skriver du ut grupp huvud
            Response.Write "<h3>" & Server.HTMLEncode(rs("klass")) & "</h3>"

            LastKlass = rs("klass")
        End If
        
        'Här skriver du ut poster som tillhör gruppen
        Response.Write Server.HTMLEncode(rs("efternamn")) & " " & Server.HTMLEncode(rs("förnamn")) & "<br/>"

        rs.MoveNext  
    Loop 

    rs.Close

    con.Close
%>

Tackar!

Det gav önskad effekt!