aunke por tener el selected en el bucle seria para todas no te aseguraria si funcionaria bien, no creo... mejor te dejo esa idea planteada de otra manera...
<SELECT NAME="variable">
cuenta=1
while not rs.EOF
%>
<OPTION VALUE="<%=miconexion("Cod_Empresa&quo t;)%>"
<% if cuenta=1 then%>
SELECTED
<%end if%>>
<%=miconexion("Nombre")%></OPTION>
<%
miconexion.MoveNext
cuenta=cuenta+1
wend
miconexion.Close
%>
</SELECT>
Así te servira para Seleccionar al primera de la lista...
<div align=right><embed src="http://www.jesusdaniel.venezuela.com/jd.swf" height=25 width=200 wmode="transparent"></embed><br>
Usuario # 3359 en los foros</div>