Sto creando con asp un applicazione dove c'è
una combo quando seleziono un valore all'interno di esso mi deve creare dinamicamente un'altra combo con altri valori e poi la stessa cosa per crearne una terza solo che fino alla secoda tutto bene mentre quando faccio per creare la terza combo mi sparisce la seconda e mi rimane la prima combo e l'ultima combo io vorrei visualizzarle tutti e tre

prima combo----
Set rsCombo_dc = server.CreateObject("ADODB.Recordset")
query = "Select nome,matricola From produzione where grado ='DC' And tipo_record='0' "

'Assegno a recordset parametri
rsCombo_dc.Open query,cn,adOpenKeyset,adLockPessimistic

matricola = rsCombo_dc.Fields("matricola").value
'Response.Write matricola
'Response.End

Response.Write "<form name=frmAdmin action='seconda.asp?' method=post>" & _
"<table border=1 width='100%'><tr><td width=70><b>D.Commer :</b>" & _
"</td><td width=70>" & _
"<select name=prova onchange='Javascript:go(" & matricola & ");'> " & _
"<option value=''></option>"
Do while not rsCombo_dc.EOF

Response.Write"<option value=" & Trim(rsCombo_dc.Fields("nome").Value) & ">" & Trim(rsCombo_dc.Fields("nome").Value) & "</option>"
rsCombo_dc.MoveNext

Loop

Response.Write "</select></td>"
set rsCombo_dc = Nothing
seconda combo---
'-------------------------------------Popolo la combo DV-------------------------------------
matricola = Request.QueryString("matricola_capo")

name= Request.Form("prova")

if name <> "" then
queryDV = "Select nome,matricola From produzione where tipo_record=0 And matricola_capo =" & matricola & " And grado='DV'"


set rsCombo_dv= server.CreateObject("ADODB.Recordset")
rsCombo_dv.Open queryDV,cn

Response.Write "<td><b>D.Vendita :</b></td><td>" & _
"<select name=prova1 onchange='Javascript:go(" & matricola & ");'> "
Do while not rsCombo_dv.EOF

Response.Write "<option value=" & Trim(rsCombo_dv.Fields("nome").Value) & ">" & Trim(rsCombo_dv.Fields("nome").Value) & "</option>"

rsCombo_dv.MoveNext

Loop

Response.Write "</select></td></tr>"

End if

set rsCombo_dv = Nothing

terza combo---
'----------------------------------popolo la combo BM----------------------------------------
matricola = Request.QueryString("matricola_capo")

name1= Request.Form("prova1")

if name1 <> "" then
queryBM = "Select nome,matricola From produzione where tipo_record=0 And matricola_capo =" & matricola & " And grado='BM'"


set rsCombo_bm= server.CreateObject("ADODB.Recordset")
rsCombo_bm.Open queryBM,cn


Response.Write"<td><b>B.Manager :</b></td><td>" & _
"<select name=prova2 > "
Do while not rsCombo_bm.EOF

Response.Write "<option value=" & Trim(rsCombo_bm.Fields("nome").Value) & ">" & Trim(rsCombo_bm.Fields("nome").Value) & "</option>"

rsCombo_bm.MoveNext

Loop
Response.Write "</select></td></tr>"
End if

Response.Write "<tr><td colspan=7 align=right><input type=submit Value =Visualizza id=submit1 name=submit1>"
Response.Write "</td></tr></table></form>"


set rsCombo_bm = Nothing

questo dipende dal fatto che dopo la prima submit tu riempi la seconda combo
ma non ti riposizioni correttamente sulla prima combo
quindi dopo il secondo submit
leggi la request della seconda combo ma la prima è vuota così non ti riempi la seconda combo
la soluzione potrebbe essere quella di posizionarti sull'option giusto della prima combo quando rientri per effetto dell'onclick
della prima combo
oppure utilizzare una variabile di sessione

es:
if Request.Form("prova") <> "" then
name = Request.Form("prova")
session("Nomecombo1") = name
else
name = session("Nomecombo1")end if
end if


FORZA LA MAGICA ROMA