select dinamiche in un form

[hugheshi]

devo inserire più select dinamiche all'interno di un form
riesco solo ad inserirne una poi va in errore il post perchè mi risponde file already in use

<%

CNN=Application("CNN")

'set connession to database 
Set objConn=Server.CreateObject("ADODB.Connection")

'open connession to database
objConn.Open CNN

Set rs = Server.CreateObject("ADODB.Recordset")
%>
<form name="info" action="registrazione_exe.asp" method="post" >
<option value="" selected>Seleziona </option>
          <%
sql = "select CR_Codice, CR_Descr from Centri" 
rs.open sql, objconn
if not rs.eof then 
do until rs.eof 
%>
          <option	value="<%=rs("CR_Codice")%>"><%= rs("CR_Descr")%></option>
          <%
rs.movenext 
loop

end if 

%>
        </select>

<option value="" selected>Seleziona </option>
          <%
sql = "select Codice, Descr2 from clienti" 
rs.open sql, objconn
if not rs.eof then 
do until rs.eof 
%>
          <option	value="<%=rs("Codice")%>"><%= rs("Descr2")%></option>
          <%
rs.movenext 
loop

end if 

%>
        </select>



<%



objconn.close 
set objconn = nothing 

%>

se ripeto una select su un'altra tabella non funziona .manca qualcosa ?

[Roby_72]

Non chiudi mai il recordset e quindi la Open non può funzionare:

<%

CNN=Application("CNN")

'set connession to database 
Set objConn=Server.CreateObject("ADODB.Connection")

'open connession to database
objConn.Open CNN

Set rs = Server.CreateObject("ADODB.Recordset")
%>
<form name="info" action="registrazione_exe.asp" method="post" >
<option value="" selected>Seleziona </option>
<%
sql = "select CR_Codice, CR_Descr from Centri" 
rs.open sql, objconn
if not rs.eof then 
do until rs.eof 
%>
          <option	value="<%=rs("CR_Codice")%>"><%= rs("CR_Descr")%></option>
          <%
rs.movenext 
loop
end if 
rs.close 
%>
        </select>

<option value="" selected>Seleziona </option>
          <%
sql = "select Codice, Descr2 from clienti" 
rs.open sql, objconn
if not rs.eof then 
do until rs.eof 
%>
          <option	value="<%=rs("Codice")%>"><%= rs("Descr2")%></option>
          <%
rs.movenext 
loop
end if 
rs.close
set rs = nothing 
%>
</select>
<%
objconn.close 
set objconn = nothing 
%>

Roby

[hugheshi]

1000 grazie , in questo modo poteri mettere anche più select basta sempre chiudere con "rs.close " dopo la 1 select e sull'ultima rs.close
set rs = nothing

[Roby_72]

Si. Ricorda, ogni volta che crei un oggetto (set) devi sempre disctruggerlo quando non ti serve più (nothing).
Ogni volta che lo apri (open) devi sempre chiuderlo (close).

Roby