webForumDet fria alternativet

sortera efter valfritt kriterie ?

ASP

4 svar · 205 visningar · startad av Pellefant

Medlem sedan maj 20023 372 inlägg
Frågan#1

Hej, detta är en del av koden på en sida. Den enda länken som leder till sidan är länken i menyn, som lyder "saljes.asp?sort=datum" (=defaultvärde)

Tanken med koden nedan är att man ska kunna välja vad som det sorteras efter.

Sortera efter:
<A HREF="saljes.asp?sort=annonsor">Annonsör</A>
<A HREF="saljes.asp?sort=forfattare">Författare</A>
<A HREF="saljes.asp?sort=datum">Införandedatum</A>
<A HREF="saljes.asp?sort=titel"Titel></A>
<A HREF="saljes.asp?sort=email">Ämne</A>

(annonsor,forfattare,datum,titel och email är detsamma som namnen på kolumnerna i Accessdatabasen)

<p>

<% Set Databas = Server.CreateObject("ADODB.Connection")
Databas.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("\kursbok\db\kurslitt.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")

SQL = "SELECT * FROM annonser WHERE typ = 'saljes' ORDER BY Request.Querystring("sort") DESC"

RecSet.Open SQL, Databas, adOpenStatic, adLockOptimistic %>

Får felmed: Sidan kan inte visas
Ett problem uppstod med sidan du försöker nå och den kan inte visas.

Tar jag bort denna koden ovan, så visas sidan dock korrekt.

Confused.... :(

Medlem sedan feb. 20022 594 inlägg
#2

SQL = "SELECT * FROM annonser WHERE typ = 'saljes' ORDER BY "& Request.Querystring("sort") &" DESC"

Medlem sedan maj 20023 372 inlägg
#3

Ekström skrev:

SQL = "SELECT * FROM annonser WHERE typ = 'saljes' ORDER BY "& Request.Querystring("sort") &" DESC"

Tack så hemskt mycket. Det fungerar.

En liten jobbig följdfråga dock.

Om man vill ha "ASC" på alla utom "datum", hur gör man då?

Medlem sedan juni 200032 967 inlägg
#4
strSortOrder = "ASC"
if Request.Querystring("sort")="datum" then strSortOrder = "DESC"
SQL = "SELECT * FROM annonser WHERE typ = 'saljes' ORDER BY "& Request.Querystring("sort") &" " & strSortOrder

Nånting sånt kanske?

Mvh,

Medlem sedan maj 20023 372 inlägg
#5

Tack så hemskt mycket, fungerar jättebra.

Det borde jag ju iofs kommit på själv kanske....nästa gång ska jag tänka till innan jag frågar.

255 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)
124 ms — ändringar (db)