sql-forespørgelse og sortering.

har følgende stykke asp-kode, hvorfor sorterer den kun efter "dato desc" også selv om jeg trykker på linkene.

Udsnit af kode:

<td class=log1 width=150><b><A href="/log1.asp?sort=">Dato:</a></b></td><td class=log1 width=100><b><A href="/log1.asp?sort=bruger">Bruger:</a></b></td><td class=log1 width=50><b><A href="/log1.asp?sort=vagt">Vagt:</a></b></td><td class=log1 width=400><b><A href="/log1.asp?sort=beskrivelse">Beskrivelse:</a></b></td>
</tr>
</table>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/log.mdb")
Conn.Open DSN
If Request.Querystring("sort") = "" THEN
sort= "dato"
ElseIf Request.Querystring("sort") = "bruger" THEN
sort="bruger"
ElseIf Request.Querystring("sort") = "beskrivelse" THEN
sort="beskrivelse"
Else
sort="dato"
End If
strSQL = "Select * from Tabel1 Order by '" & sort & "' Desc"
Set rs = Conn.Execute(strSQL)

Do
count=count+1
count1=count/2
If Instr(count1, ",") THEN
color="#FFFFFF"
Else
color="#CCCCCC"
End IF
  Response.Write "<table width=700 border=1 bgcolor=" & color & ">" & "<tr>" & "<td class=log1 width=150 valign=top bordercolor=" & color & ">" & rs("dato") & "</td><td class=log1 width=100 valign=top bordercolor=" & color & ">" & rs("bruger") & "</td><td class=log1 width=50 valign=top bordercolor=" & color & ">" & rs("vagt") & "</td><td class=log1 width=400 valign=top bordercolor=" & color & ">" & rs("beskrivelse") & "</td>" & "</tr>" & "</table>"

  rs.MoveNext

Loop While Not rs.EOF

Conn.Close
Set Conn = Nothing
%>