Udtræk fra DB til Dropdown men mangler hele tiden 1 record

Hej,

jeg har ofte været ude for dette problem når jeg trækker data ud af min database til en dropdown, så mangler der en record i dropdown boksen, det er somregl altid den sidst indtastede record som mangler.

min kode ser således ud:

<%
Set oDB = Server.CreateObject("ADODB.connection")
  oDB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../../db/tilsalg.mdb")

Set oRS = oDB.execute("SELECT overskrift,AutoID FROM [items] ORDER BY overskrift DESC")
oRS.MoveNext
%>
<form name="formSwimProfil" method="get">
            <p align="left">
            <font face="Verdana">
<%
Response.Write "<select name=txtSwimProfilGet size=1>"
Do While Not oRS.EOF
  Response.Write "<option value=" & oRS("AutoID") & ">" & oRS("overskrift") & "</option>"
  oRS.MoveNext
Loop
Response.Write "</select>"
oRS.Close
Set oRS = Nothing
Set oDB = Nothing
%>