Vis kun 10 nueste nyheder

Hvordan viser jeg kun fx. de 10 første nyheder?

Her er min kode der viser mine nyheder:

<%

Dim strConnect, Rs
Set Rs = Server.CreateObject("ADODB.Connection")
Rs.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../tab2/db/database.mdb")

sql = "SELECT * FROM nyheder ORDER by dato DESC"

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open sql, Rs

%>

<%
While NOT objRec.EOF
%>

Her kommer nyhederne

<%
record
objRec.MoveNext

Wend


objRec.close
Rs.Close
SEt Rs = Nothing

%>