SQL = "SELECT * FROM annonser WHERE typ = 'saljes' ORDER BY "& Request.Querystring("sort") &" DESC"
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.... :(

