codice completo:
codice:
<%
sql = "SELECT id_nome, nome FROM anagrafica group by id_nome, nome"
Set rec = Server.CreateObject("ADODB.Recordset")
rec.Open sql, cn, 3, 3
Do While Not rec.EOF
nome = rec("nome")
id_nome = rec("id_nome")
%>
<option value="<%=rec.Fields.Item("id_nome").Value%>-<%=rec.Fields.Item("nome").Value%>"
<% if campo = cstr(nome) then response.write("selected") end if%>>
<%=rec.Fields.Item("id_nome").Value%>-<%=rec.Fields.Item("nome").Value%></option>
<%
rec.MoveNext
Loop
end if
rec.Close
set rec = Nothing
%>
<a href="riepilogo.asp?id=<%=id%>">[img]img/icon.gif[/img]