kode for rækkefølge af database indhold

Hej
Asp er meget nyt for mig.

Jeg henter forskellige variabler ind fra en access database og står nu og har brug for at den sidst nye variabel der er blevet skrevet i  databasen bliver vist først. Er der en der kan sige hvilken kode jeg skal tilføje mit asp script

%
db1 =  \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"& Server.MapPath(\"tour_diary.mdb\") &\";DefaultDir=\"& Server.MapPath(\".\") &\";DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5\"
Dim DBConn, strSECTION
Set DBConn = Server.CreateObject(\"ADODB.Connection\")
DBConn.Open db1
Set CmdA = Server.CreateObject(\"ADODB.Recordset\")
CmdA.Open \"guest\", DBConn,1, 3
if request(\"action\") = \"new\" then

        CmdA.AddNew
        if not request(\"email\") = \"\" then CmdA(\"email\") = replace(request(\"email\"),\"&\",\"and\")
        if not request(\"mess\") = \"\" then CmdA(\"message\") = replace(request(\"mess\"),\"&\",\"and\")
        if not request(\"name\") = \"\" then CmdA(\"name\") = replace(request(\"name\"),\"&\",\"and\")
        CmdA.Update
        %>succes=1<%


else
%>count=<%=CmdA.recordCount%><%
if not CmdA.Eof then
%>&f_name<%=x%>=<%=CmdA(\"name\")%>&f_mess<%=x%>=<%=CmdA(\"message\")%>&f_email<%=x%>=<%=CmdA(\"email\")%><%
end if
x = 0
do until CmdA.eof
x = x + 1

%>&name<%=x%>=<%=CmdA(\"name\")%>&mess<%=x%>=<%=CmdA(\"message\")%>&email<%=x%>=<%=CmdA(\"email\")%><%

CmdA.Movenext
loop
end if

CmdA.Close
Set CmdA = nothing
DBConn.Close
Set DBConn = nothing
%>



mvh iggi