Sortering efter dato

hej jeg lister en række aktiviterter således. jeg vil gerne have dem så dem der har den "laveste" dato ligger øverst, jeg har en værdi i databasen der ligger som en dato:

rsu = "select * from kursus k where k.Aktivitet not in (Select t.Aktivitet from tilmeldte_kursus t Where t.Initial = '" & session("username")& "')"
set rs = my_conn_udd.Execute(rsu)

<%
        if rs("DeltagereMax") =< rs("DeltagereNu") then
        else
        response.write "<input type=radio name='sub' value='"&rs("ID")&"'>"&"<br>"
          response.write rs ("Dato")&"<br>"
          response.write rs("Aktivitet")&"<br>"&"<br>"
        end if
          rs.movenext
          %>

er der en nem måde man kan få den til at sortere dem således?