Date

http://www.web-zone.dk/ringetoner/engelsk/ringetoner.asp

hvordan skal jeg lægge dem efter dato...sådan at de nyeste ringetoner kommer først ???

                    <%
Set connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"engelsk.mdb\")
sql = \"select * from ringetoner where godkendt=\'Ja\' ORDER BY setgange DESC\"
Set rs = Server.CreateObject(\"ADODB.Recordset\")
set rs = Connect.execute(SQL)

count = 40
While not rs.eof and count > 0
count = count -1
%>