ASP - Boton desplegable

Una vez pueso el Campo desplegable y con las opciones que van dentro en una BD Access y echo el acceso a la BD, ¿ Como relleno es boton desplegable? Gracias

SQL="SELECT * FROM Categorias"
rs.Open SQL, oConnwhile not rs.EOF
%>
<OPTION VALUE="<%=rs.Fields("IdCategoria")%>"
<% if cuenta=1 then%>
SELECTED
<%end if%>>
<%=rs.Fields("NomCategoria")%></OPTION>
<%
rs.MoveNext
cuenta=cuenta+1
wend
rs.Close
%>
</SELECT>