En fråga är det någon som har gjort en funktion som sorterar som i tex out look... Man klick på rubriken så sorteras det på stigande eller fallande...
Om man har en telelista med massor med personer ordnat desc och vill ha dom asc. Så för att snabba upp det hela borde man väl hämta hela listan och lägga i en array som man sedan loopar ut baklänges/framlänges....
Jag är bara ute och forskar lite ni kommer nog stöta på mer frågor om detta fram över .... Vi har inte börjat än.....
Gärna ett lite kod exempel på hur man skulle kunna göra ....
Har inte sten koll på arrayfunktionerna..
Jag har använt mig av en liknande funktion för att sortera kontaktlistor, men då använde jag mig av formulär med en select-lista där man kunde välja att sortera efter förnamn fallande/stigande, efternamn fallande/stigande, e-mail fallande/stigande, osv...
Jag gjorde det enkelt för mig och lade in nyckelord som jag sedan kunde styra SQL-queryn med.
If Request.Querystring("sort")<>"" Then
If Session("sort")="Lastname" Then
Session("sort")="Firstname"
Else
Session("sort")=Request.Querystring("sort")
End If
Else
If Session("sort")<>"" Then
Session("sort")=Session("sort")
Else
Session("sort")="Lastname"
End If
End If
If Request.QueryString("char")<>"" Then
If Request.QueryString("char")="i23" Then
Session("bokstav")="LIKE '[0-9]%'"
Else
Session("bokstav")="LIKE '"& Request.QueryString("char")&"%'"
End If
Else
If Session("bokstav")<>"" Then
Session("bokstav")=Session("bokstav")
Else
Session("bokstav")="Like '%'"
End If
End If
Select * From Address Where BelongsTo="& user("UserID") &" And Lastname "& Session("bokstav") &" Order By "& Session("sort")
ett sätt att göra det på, lite krångligt med if satserna för bokstäver och siffror, har inte orkat ändra det än! men det funkar
Ok, här kommer ett litet kod-förslag från mig också då... Inget märkvärdigt, men det borde funka.
Select Case Request.Form("sortera")
Case "fornamn_a-ö" sSQL = "SELECT * FROM tblTabell ORDER BY firstname ASC"
Case "fornamn_ö-a" sSQL = "SELECT * FROM tblTabell ORDER BY firstname DESC"
Case Else sSQL = "SELECT * FROM tblTabell ORDER BY firstname ASC"
End Select
set objRS = connectionObjekt.Execute(sSQL)
%>
<! SKRIV UT VÄRDEN >
<form action="<% =Request.ServerVariables("SCRIPT_NAME") %>" method="POST">
<select name="sortera">
<option value="fornamn_a-ö">Förnamn, A-Ö</option>
<option value="fornamn_ö-a">Förnamn, Ö-A</option>
</select>
<input type="submit" value="Sortera!">
</form>
Inga konstigheter, va? Självklart kan du använda QueryString's, men jag tycker det blir snyggare när man inte ser vad webbsidorna håller på med
391 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
