se sono ripetitivi li raggruppi quando fai la query.
Esempio:
codice:
<select size="1" name="denominazione1">
                <option>Selezionare_Casa_Editrice</option>
                <%
                                               
sql = "SELECT denominazione FROM catalogo_linee group BY denominazione"
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("denominazione"), " ", "_")%>><%=rs("denominazione")%> </option>
                      
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
%>
              </select>