Soter på kolonne

jeg tror det kræver lidt kode for at se hvad du skal rette til.

her er uddrag af koden:

order = request.QueryString("order")
kol = request.QueryString("kol")

if not request.querystring("abc") = "" then
abc = request.querystring("abc")
selectabc = " where navn like '" & abc & "%'"
else
selectabc = ""
end if

if not kol = "" then
strSQL = "select * from " & tabel & selectabc & " order by " & kol & " " & order & ";"
else
strSQL = "select * from " & tabel & selectabc & " order by navn asc"
end if

set anmeld_rec = objConn.execute(strSQL)
'response.Write anmeld_rec("navn")
'response.end
if order = "" or order = "asc" then
order = "desc"
else
order = "asc"
end if



for m = 0 to col
  response.Write("<td width='17%' valign='top' class='h3-seo-bold'><a href='anmeld.asp?anmeld=" & valg & "&" & tilstand & "abc=" & abc & "&kol=" & kolnavn(m) & "&order=" & order & "'>" & viskolnavn(m) & "</a></td>")
next

Umiddelbart ville jeg jo undlade at sende order med ned og blot sørge for at tjekke om kol er den samme som sidst. Hvis den ikke er det, skal der sorteres asc, ellers desc...

tjo men hvordan "huskes" hvad den var sidst? om det er den samme eller en ny?

Ja, jeg sad lige og overvejede det samme og du er nok ikke interesseret i at fyre op under session (med mindre den allerede er fyret op :-))...

Du kunne sende den aktuelle kolonne med til udtrækket, så du dermed kan bestemme om der skal sorteres stigende eller faldende. Jeg kunne forestille mig noget i stil med:

aktkol = request.QueryString("aktkol")
kol = request.QueryString("kol")

if not request.querystring("abc") = "" then
  abc = request.querystring("abc")
  selectabc = " where navn like '" & abc & "%'"
else
  selectabc = ""
end if

if kol = "" then
  kol = navn
end if

if kol <> aktkol then
  order = "asc"
else
  order = "desc"
end if

strSQL = "select * from " & tabel & _
    selectabc & " order by " & kol & " " & order & ";"

set anmeld_rec = objConn.execute(strSQL)

for m = 0 to col
  response.Write("<td width='17%' valign='top' class='h3-seo-bold'><a href='anmeld.asp?anmeld=" & valg & "&" & tilstand & "abc=" & abc & "&kol=" & kolnavn(m) & "&aktkol=" & kol & "'>" & viskolnavn(m) & "</a></td>")
next

Jeg har omformuleret din kode lidt, men i bund og grund burde den gøre det samme...

UPS! Der sneg sig lige en ligge fejl ind i denne passage:

if kol = "" then
  kol = navn
end if

Det skal naturligvis være:

if kol = "" then
  kol = "navn"
end if

Desværre. Den lader ikke til at være bedre end den jeg selv havde. Hvis fx. aktkol og kol er identiske, bliver den ved med at sorterer desc.

Nå, men så slipper du nok ikke helt for order-parameteren :-)

Order er så kun interessant i det tilfælde at sorteringskolonnen er den samme som sidste gang...

Jeg forestiller mig noget i stil med:

Har afprøvet det, og det virker stadig ikke efter hensigten.

Kan du evt. løfte sløret for hvad der sker...?

prøv med dette

order = request.QueryString("order")
kol = request.QueryString("kol")

If Not request.querystring("abc") = "" Then
  abc = request.querystring("abc")
  selectabc = " where navn like '" & abc & "%'"
Else
  selectabc = ""
End If

If Not kol = "" Then
  strSQL = "select * from " & tabel & selectabc & " order by " & kol & " " & order & ";"
Else
  strSQL = "select * from " & tabel & selectabc & " order by navn asc"
End If

set anmeld_rec = objConn.execute(strSQL)

For m = 0 To col
  order = "asc"

  If col = kolnavn(m) And order = "asc" then
    order = "desc"
  End If

  Response.Write("<td width='17%' valign='top' class='h3-seo-bold'><a href='anmeld.asp?anmeld=" & valg & "&" & tilstand & "abc=" & abc & "&kol=" & kolnavn(m) & "&order=" & order & "'>" & viskolnavn(m) & "</a></td>")
Next

--------------------

softspot >> hvad er BB-code for at pakke kode ind i det blå felt?

keysersoze >> div i kantede paranteser (jeg kan ikke lige finde ud af hvordan jeg skal vise det, men jeg tror du forstår :))...

softspot: Det er samme problem som sidst.

sry - lille fejl, det skal hedde

If kol = kolnavn(m) And order = "asc" then

Tak for hjælpen. Jeg er tilfreds med som det er nu. Læg gerne et svar.

svar (hvis mine kommentarer har været med til løsningen).

lukketid?