Sorteringsspørgsmål

Hej allesammen

Jeg har noget kode der fremviser en liste ud for en database, pt. er den sorteret ud for et fast kriterie, men jeg kunne godt tænke mig at man kunne klikke på en overskrift og på den måde sortere efter eget valg!

Er der nogen der kan hjælpe mig? Jeg har forsøgt forskellige småting, men jeg har ikke kunnet få det til at fungere.

Her er koden:

<html>
<head>
<title></title>
<style>
a { text-decoration: none }
a:hover { text-decoration: underline; color: #0000ff }
</style>
</head>

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"medlemmer.mdb\")
SQLstmt = \"Select * From data Order By mainchar\"
SQLstmt1 = \"Select * From data Order By charname\"
Conn.Execute (SQLstmt)
Conn.Execute (SQLstmt1)
Set RS = Conn.Execute(SQLstmt)
Set RS1 = Conn.Execute(SQLstmt1)
%>

<body link=\"#000000\" vlink=\"#000000\" alink=\"#000000\">
<center>
<table width=\"95%\" cellpadding=\"0\" cellspacing=\"0\" border=\"0\">
<tr>
<td width=\"50%\"><font face=\"Comic Sans MS\"><b><u>Name:</u></b></font></td>
<td width=\"10%\"><font face=\"Comic Sans MS\"><b><u>Status:</u></b></font></td>
<td width=\"10%\"><font face=\"Comic Sans MS\"><b><u>Race:</u></b></font></td>
<td width=\"10%\"><font face=\"Comic Sans MS\"><b><u>Class:</u></b></font></td>
<td width=\"10%\"><font face=\"Comic Sans MS\"><b><u>Level:</u></b></font></td>
<td width=\"10%\"><font face=\"Comic Sans MS\"><b><u>Main:</u></b></font></td>
</tr>
<tr>
<td colspan=\"6\">&nbsp;</td>
</tr>

<%
DO WHILE NOT rs.EOF
%>

<tr>
<td width=\"50%\"><font size=\"2\"><a href=\"egenside.asp?id=<%=rs(\"id\")%>\"><b><%=rs(\"charname\")%></b></a></font></td>
<td width=\"10%\"><font size=\"2\"><%=rs(\"charstatus\")%></font></td>
<td width=\"10%\"><font size=\"2\"><%=rs(\"charrace\")%></font></td>
<td width=\"10%\"><font size=\"2\"><%=rs(\"charclass\")%></font></td>
<td width=\"10%\"><font size=\"2\"><%=rs(\"charlevel\")%></font></td>
<td width=\"10%\"><font size=\"2\"><%=rs(\"mainchar\")%></font></td>
</tr>
<tr>
<td colspan=\"6\">&nbsp;</td>
</tr>
<tr>
<td colspan=\"6\"><img src=\"linie.gif\" width=\"100%\" alt=\"Adskillelseslinie med øjne\"></td>
</tr>
<tr>
<td colspan=\"6\">&nbsp;</td>
</tr>

<%
rs.MoveNext
LOOP
RS.Close
\'conn.Close
\'Set conn = nothing
Set SQLstmt = nothing
%>

</table>

<form method=\"post\" action=\"medlemmer2.asp\">
<select name=\"medlemnavn\">
<option selected>Karakternavn
<%
DO WHILE NOT rs1.EOF
%>

<option value=\"<%=rs1(\"charname\")%>\"><%=rs1(\"charname\")%>

<%
rs1.MoveNext
LOOP
RS1.Close
conn.Close
Set conn = nothing
Set SQLstmt1 = nothing
%>

</select>
<select name=\"medlemlevel\">
<option selected>Level
<option value=\"01\">01
<option value=\"02\">02
<option value=\"03\">03
<option value=\"04\">04
<option value=\"05\">05
<option value=\"06\">06
<option value=\"07\">07
<option value=\"08\">08
<option value=\"09\">09
<option value=\"10\">10
<option value=\"11\">11
<option value=\"12\">12
<option value=\"13\">13
<option value=\"14\">14
<option value=\"15\">15
<option value=\"16\">16
<option value=\"17\">17
<option value=\"18\">18
<option value=\"19\">19
<option value=\"20\">20
<option value=\"21\">21
<option value=\"22\">22
<option value=\"23\">23
<option value=\"24\">24
<option value=\"25\">25
<option value=\"26\">26
<option value=\"27\">27
<option value=\"28\">28
<option value=\"29\">29
<option value=\"30\">30
<option value=\"31\">31
<option value=\"32\">32
<option value=\"33\">33
<option value=\"34\">34
<option value=\"35\">35
<option value=\"36\">36
<option value=\"37\">37
<option value=\"38\">38
<option value=\"39\">39
<option value=\"40\">40
<option value=\"41\">41
<option value=\"42\">42
<option value=\"43\">43
<option value=\"44\">44
<option value=\"45\">45
<option value=\"46\">46
<option value=\"47\">47
<option value=\"48\">48
<option value=\"49\">49
<option value=\"50\">50
<option value=\"51\">51
<option value=\"52\">52
<option value=\"53\">53
<option value=\"54\">54
<option value=\"55\">55
<option value=\"56\">56
<option value=\"57\">57
<option value=\"58\">58
<option value=\"59\">59
<option value=\"60\">60
</select>
<input type=\"text\" name=\"kodeord\" size=\"25\" value=\"Indtast dit kodeord\">
<input type=\"submit\" value=\"send\">
</form>

</center>
</body>
</html>

På forhånd tak gutter
Søren