Visualizzazione dei risultati da 1 a 3 su 3
  1. #1

    Dati su seconda select in base alla prima

    Ciao a tutti.
    Di sicuro se ne è già parlato, ma non ho trovato niente sul forum (anche se se ne è già parlato :master: ): in una form di inserimento record nel db come faccio dopo aver selezionato una voce da una select ricaricare la pagina, recuperare i dati fin lì già inseriti e valorizzare la seconda select in base alla prima?

    Il problema è passare i dati del form quando si fa il refresh.
    Ho fatto così, ma ovviamente non funziona, in quanto i dati del form non vengono passati:
    codice:
    <%
    data_ins = request.form("data_ins") ' i dati da recuperare 
    code = request.form("code")
    cat = request.form("cat")
    %>
    <tr>
    <td class="form">CATEGORY</td><td class="dati">
    <select name="cat" onchange="gotourl();">
    <option>Choose one...</option>
    
    <%
    sqlstring = "SELECT * FROM category ORDER BY cat" ' questa select viene creata perfettamente 
    Set objRs = Server.CreateObject("ADODB.Recordset")
    objRs.ActiveConnection = objConn
    objRs.Open sqlstring
    
    Do While not objRs.EOF
    	If cat = "" then
    		response.write "<option value=""" & objRs("id") & """>" & objRs("cat") & "</option>"
    	Else
    		response.write "<option value=""" & objRs("id") & """" & SELECTED(objRs("id"), cat) & ">" & objRs("cat") & "</option>"
    	End If
    objRs.Movenext
    Loop
    
    objRs.Close
    Set objRs = Nothing
    %>
    </select>
    </td>
    </tr>
    <tr>
    <td class="form">SUBCATEGORY</td><td class="dati">
    <select name="cat">
    <option>Choose one...</option>
    <%
    sqlstring = "SELECT * FROM subcategory WHERE cat = '" & cat & "' ORDER BY subcat" ' questa select non funziona in quanto non recupera i dati del form 
    Set objRs = Server.CreateObject("ADODB.Recordset")
    objRs.ActiveConnection = objConn
    objRs.Open sqlstring
    
    Do While not objRs.EOF
    	response.write "<option value=""" & objRs("id") & """>" & objRs("cat") & "</option>"
    objRs.Movenext
    Loop
    
    objRs.Close
    Set objRs = Nothing
    'objConn.Close
    'Set objConn = Nothing
    %>
    </select>
    Idee?

  2. #2

  3. #3
    Grazie. Ora lo guardo.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.