Ciao ragazzi..
sto facendo un po di praticantatum con l'inner join e guardacaso, ho un problema giusto giusto su quella query.
Script semplicissimo in asp. Due tabelle, una con anagrafica alteti (ANA) e una con gli sport praticati (SPORT).
Vorrei riuscire ad associare lo sport chiamandomi prima l'id atleta da ANA, selezionare il record giusto in SPORT e aggiungere lo sport. Più o meno faccio così:
codice:<body> Inserisci l'anagrafica: <form name="ana" method="post"> <div style="width:250px">Nome</div> <input type="text" name="nome" id="nome" /> <div style="width:250px">Cognome</div> <input type="text" name="cognome" id="cognome" /> <div style="width:250px">Anno</div> <input type="text" name="anno" id="anno" /> <input type="submit" value="Salva" name="bottone" id="bottone" /> </form> <% if request.Form("bottone")="Salva" then dim RSX, CNN, ConnString, query ConnString = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & Server.Mappath("/mdb-database/ticket_gz.mdb") set CNN = server.CreateObject("ADODB.CONNECTION") CNN.open ConnString set RSX = server.CreateObject("ADODB.RECORDSET") query = "select * from ANA" RSX.open query, CNN, 3, 3 RSX.addnew RSX("nome")= request.form("nome") RSX("cognome")=request.form("cognome") RSX("anno")= request.form("anno") RSX.update response.Redirect("default.asp?inserisci=sport") RSX.Close CNN.Close set RSX = Nothing set CNN = Nothing end if if request("inserisci")="sport" then %> Ricerca l'utente per cognome: <form name="cognome" method="post"> <div style="width:250px">Cognome</div> <input type="text" name="cognomex" id="cognomex" /> <input type="submit" value="Ricerca" name="bottone" id="bottone" /> </form> <% if request.Form("bottone")="Ricerca" then ' response.Write(request.Form("cognomex")) ' response.End() ConnString = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & Server.Mappath("/mdb-database/ticket_gz.mdb") set CNN = server.CreateObject("ADODB.CONNECTION") CNN.open ConnString set RSX = server.CreateObject("ADODB.RECORDSET") query = "select * from ANA where cognome = '" & request.Form("cognomex") & "'" RSX.open query, CNN, 3, 3 do until RSX.EOF %> "><%=RSX("nome")%><%=RSX("cognome")%> <% RSX.movenext loop RSX.Close CNN.Close set RSX = Nothing set CNN = Nothing end if if request("id_a") <> "" then response.Write("entro") response.End() %> <form name="sport" method="post"> <div style="width:250px">Sport praticato</div> <input type="text" name="sport" id="sport" /> <input type="submit" value="Salva" name="bottonee" id="bottonee" /> </form> <% if request.form("bottonee")="Salva" then dim RSX2, CNN2, ConnString2, query2 ConnString2 = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & Server.Mappath("/mdb-database/ticket_gz.mdb") set CNN2 = server.CreateObject("ADODB.CONNECTION") CNN2.open ConnString2 set RSX2 = server.CreateObject("ADODB.RECORDSET") query2 = "select * from ANA inner join SPORT on ana.id = sport.id where ana.id = " & request("id") & ";" RSX2.open query2, CNN2, 3, 3 RSX2("sport")=request.Form("sport") RSX2.update RSX2.Close CNN2.Close set RSX2 = Nothing set CNN2 = Nothing end if end if end if %> </body>![]()

Rispondi quotando