tipo quello di optime....


<SELECT id=select2 name="mese">
<OPTION selected><%=mese%></OPTION>
<%
dim rs
set rs=server.CreateObject("ADODB.RecordSet")
dim sql
sql="select * from mesi"
rs.Open sql, cn,1,3
rs.MoveFirst
while not rs.eof
%>
<option><%=rs("mesi")%></option>
<%
rs.MoveNext
wend
rs.close
%>
</SELECT>