Si quieres mostrar el recordset entero, devuelto por la consulta, usa algo como esto:
Código:
<SELECT SIZE="1" NAME="nombre_que_quieras">
<%
'Creamos el bucle
Do while Not rs.EOF
%>
<OPTION><%=tu_funcion(rs("campo_1"))%></OPTION>
<%
'Nos movemos al siguiente registro
rs.MoveNext
Loop
%>
</SELECT>
Salu2