Originariamente inviato da Fichico
mi riporti il codice della listbox?
Grazie, eccolo:
codice:
<select size="1" name="campo_form">
<option>Seleziona</option>
<%
SQL = "SELECT campo1, campo2 FROM tabella GROUP BY campo1, campo2 ORDER by campo1 asc"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, cn, 3, 3
On Error Resume Next
rs.MoveFirst
Do While Not rs.EOF%>
<option value=<%=replace(rs("campo1"), " ", "_") & replace(rs("campo2"), " ", "_")%>><%=rs("campo1") &" "& rs("campo2")%> </option>
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
%>