grazie ho provato così ma stessa cosa:
codice:
<select size="1" name="con">
<option value="">Seleziona</option> 
<%
sql = "SELECT * FROM esercizio WHERE codice = '" & request.form("condo")&"'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
if not rs.EOF then
rs.MoveFirst 
Do Until rs.EOF
%>
<option value="<%=rs("ese")%>"><%=rs("ese")%></option> 
<%
rs.MoveNext
Loop
%>
<%
else
%>
<font face="Tahoma" size="2">[b]Nessun dato disponibile[b]</font>
<%
end if
rs.Close
set rs = Nothing
%>							
</select>