Cosa c'è di sbagliato in questo code?: perchè la select non mi restituisce i valori che ho registrato nella tabella TXT:
codice:
 <select size="1" name="fname">
                <option>Selezionare_Casa_Editrice</option>
                <%

Set cn=Server.CreateObject("ADODB.Connection")
OpenStr = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("/mdb-database/FileDB.mdb")
cn.Open openStr
                                               
sql = "SELECT * FROM TXT"
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=<%=rs("Id")%>><%=rs("Id")%> - <%=rs("Testo")%></option>
                      
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
%>
              </select>