codice:
function selected_comp(rs_comp, mem_comp)
 if rs_comp = mem_comp then
  ris = "selected=""selected"""
 else
  ris = ""
 end if
 selected_comp = ris
end function
poi per esempio:

codice:
<option value="xxx" <%=selected_comp(rs_riepilogo("comp_base"), rs_base("cod_art"))%>