Urgente Combo box con bd

[Dromo]

Hola a todos

Tengo el siguiente drama con este código:

<select name="menu1" onChange="MM_jumpMenu('parent',this,0)" class="text2">
<option selected value="NoUsar">Seleccione Version</option>
<%
Do While Not rsDC.EOF
Response.Write("<option value=""" & Trim(rsDC("cod_version")) & """>" & Trim(rsDC("nombre")) & "</option>")

rsDC.MoveNext
Loop
rsDC.Close
%>
</select>

Al visualizar esta línea que quiero que aparezca primero en el combo box, no me aparece <option selected value="NoUsar">Seleccione Version</option>
Solo me aparece lo que tengo en la base de datos

Alguna ayuda urgente

[orharo2003]

Nunca me había pasado, yo siempre lo hago de esta forma:

<select name="menu1" onChange="MM_jumpMenu('parent',this,0)" class="text2">
<option selected value="NoUsar">Seleccione Version</option>
<%
Do While Not rsDC.EOF
%>
<option value="<%=Trim(rsDC("cod_version")) & Trim(rsDC("nombre")) %>"></option>
<%
rsDC.MoveNext
Loop
rsDC.Close
%>
</select>

--
Suerte

[Dromo]

Gracias orharo
Finalmente modifiqué un poco y quedo:
<select name="cod_version" onChange="MM_jumpMenu('parent',this,0)" class="text2">
<option selected>Seleccione Version</option>
<%
Do While Not rsDC.EOF
Response.Write("<option value=""" & Trim(rsDC("cod_version")) & """>" & Trim(rsDC("nombre")) & "</option>")

rsDC.MoveNext
Loop
rsDC.Close
%>
</select>

Me funcionó perfecto

Gracias, nuevamente