codice:
<select onChange="stringona()">
<%
BancaSql = "SELECT DISTINCT ID_BANCA,ID_ASSICUR FROM ABILITAZIONI_PROD_BAN WHERE ID_USER= '" & utente & "'"
Set RsBanca = conndb.execute(BancaSql) 
Do While Not RsBanca.EOF%>
						
<option value=<%Response.Write(RsBanca("ID_BANCA"))%>>
<%Response.Write("BA00" & RsBanca("ID_BANCA"))%></option>
<%RsBanca.MoveNext
Loop%>
						
</select>
<input name="stringona" type="hidden" value=<% Do While NotRsBanca.EOF%>
						
<%Response.Write(RsBanca("ID_BANCA"))%>
<%RsBanca.MoveNext
Loop%>  >
							 
<% RsBanca.close 
set RsBanca = nothing 						
%>
il secondo ciclo non mi stampa nulla a video:

<input name="stringona" type="hidden" value= >

Why?