Sortering efter namn i *.mdb fil...

Jag får inte sortering efter 'filnamn' att funka...här kommer koden:

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/cryptonic/database/fildb.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")

visa = "SELECT * FROM windows ORDER BY filnamn DESC"
RecSet.open visa, Connect, adOpenStatic, adLockOptimistic
Do Until RecSet.EOF

varannanrad = varannanrad + 1
If varannanrad Mod 2 = 0 then
BGcolor = "333333"
Else
BGcolor = "666666"
End If
%>
<!-- WINDOWSoutput - start -->
<tr align="left" valign="top">
<td bgcolor="#<%=BGcolor%>" width="229"> <font size="2" face="Arial, Helvetica, sans-serif"><a onMouseOver=" window.status= 'Ladda ner.' ; return true" onMouseOut="window.status=''; return true" href="<%=recSet("sokvag")%>"><%=recSet("filnamn")%></a></font>
<%rakning = DateDiff("d", recSet("datum"), Date)

If rakning < raknarvarde then%> <img src="ny.gif"> <%end if%></td>
<td bgcolor="#<%=BGcolor%>" width="82"> <%=recSet("storlek")%> </td>
<td bgcolor="#<%=BGcolor%>" width="289" > <font size="2" face="Arial, Helvetica, sans-serif"><%=recSet("beskrivning")%></font>
</td>
<!-- WINDOWSoutput - slut -->
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.close
%>

Hoppas det räcker med denna kod.

Någon som vet varför det inte funkar?