select combinate

[forte78]

salve ho questo problema :


ho una serie di select tra loro collegate per la ricerca di zone:

premetto che queste select sono tutte collegate a una tabella di un db

*****************1° SELECT*****************


<select name="comune" size="1" class="normales" onchange="RefreshForm('comune');">

<option value=""></option>
<%
Set Con = Server.CreateObject("ADODB.Connection")
Set rsQuery = Server.CreateObject("ADODB.Recordset")
Path = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
Path = Path & Server.MapPath("/public/databasequartiere.mdb")
Con.Open Path
Set rs = Con.Execute("select distinct comune from quartiereweb order by comune Asc")
while rs.eof = false
AddOption Rs(0),Rs(0),"comune"
rs.MoveNext()
wend
rs.close
con.close
%>
</select>

*****************2° SELECT*****************


<select name="cercaanche1" size="1" class="normales" onchange="RefreshForm('cercaanche1');">
<option value=""></option>
<%
Set Con = Server.CreateObject("ADODB.Connection")
Set rsQuery = Server.CreateObject("ADODB.Recordset")
Path = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
Path = Path & Server.MapPath("/public/databasequartiere.mdb")
Con.Open Path
Set rs = Con.Execute("select distinct comune from quartiereweb order by comune Asc")
while rs.eof = false
AddOption Rs(0),Rs(0),"cercaanche1"
rs.MoveNext()
wend
rs.close
con.close
%>
</select>



*****************3° SELECT*****************



<select name="cercaanchef1" size="1" class="normales">

<option value=""></option>
<%
Set Con = Server.CreateObject("ADODB.Connection")
Set rsQuery = Server.CreateObject("ADODB.Recordset")
Path = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
Path = Path & Server.MapPath("/public/databasequartiere.mdb")
Con.Open Path
Set rs = Con.Execute("select distinct quartiere from quartiereweb where comune='" & Replace(Request.Form("cercaanche1"),"'","''") & "' order by quartiere Asc")
while rs.eof = false
AddOption Rs(0),Rs(0),"cercaanchef1"
rs.MoveNext()
wend
rs.close
con.close
%>
</select>

Le select devono essere tra loro combinate esempio :

si seleziona nella prima SELECT il valore = ROMA in automatico con il refresh anche la 2° deve essere = ROMA la 3° SELECT ma sempre simultaneamente al refresh precedente deve visualizzare in automatico i valori corrispondenti a ROMA = COLOSSEO, CAVOUR, TERMINI, VITTORIO EMANUELE .......

Come possiamo correggere la select ???

Grazie un saluto

[cavicchiandrea]

Per incatenare le select devi passargli i parametri in querystring comune=roma&quartiere=eur e le query dovranno essere progressive la prima filtra il comune la seconda il quartiere etc....
Per impostare la option selezionata dentro al ciclo inserisci una if esempio:
if rs("comune") = Request("comune") Then
sel = "selected=""selected"""
else
sel = ""
end if