pagina che legge i dati in base al link selezionato

[andreyax2]

Ciao a tutti... sto sbattendo la testa da 3 ore su questa cosa... spero ci sia qualcuno che sia in grado di aiutarmi.....

Spiego:

La pagina "B" (leggi_convenzionati.asp) dovrebbe recuperare (se funzionasse ^_^) i dati dal database andando a selezionare i record in base a quale "Categoria" si è scelto di cliccare nella pagina precedente "A" (convenzionati.asp).

il campo "Categoria" è ridondante nel database (Es.: 6 record con la Categoria 1; 10 record con la Categoria 2; 8 record con la Categoria 3).


- Codice inserito nella pagina "A" (convenzionati.asp) che porterà alla pagina "B" (leggi_convenzionati.asp):


SQL = "SELECT categoria FROM gestione_convenzionati ORDER BY CATEGORIA"

"><%=RS("Categoria")%>


- Codice inserito nella pagina "B" (leggi_convenzionati.asp):

SQL = "SELECT * FROM gestione_convenzionati WHERE CATEGORIA = " & Request.QueryString("Categoria") &" ORDER BY RAGIONE"

<%=RS("Ragione")%>
<%=RS("Indirizzo")%>
<%=RS("Cap")%>
<%=RS("Localita")%>
<%=RS("Provincia")%>

[alexba64]

Quindi ?

[zazoom]

Ciao..
Scusami ma mi sembra abbastanza ovvio che nn restituisca risultati: inserisci nella querystring due volte "categoria" .....chiedi di restituirti valori dove "categoriacategoria" = "categoria".
Almeno è quello che si capisce...se nn è cosi cerca di essere più chiaro.
Ciao

[alexba64]

Originariamente inviato da zazoom
Ciao..
Scusami ma mi sembra abbastanza ovvio che nn restituisca risultati: inserisci nella querystring due volte "categoria" .....chiedi di restituirti valori dove "categoriacategoria" = "categoria".
Ciao

[zazoom]

Opps vero...non avevo fatto attenzione :master:
Scusa

[andreyax2]

Ragazzi onestamente non ho capito...

qual è la soluzione?

non mi sembra di aver indicato nella querystring un valore "categoriacategoria"

[alexba64]

La soluzione a cosa ?

Guarda che non si è capito ! Cosa hai chiesto ?

[andreyax2]

ok.. allora mi impegno di più vediamo spiego tutto bene di seguito:


Composizione campi di database.mdb (Tabella: gestione_convenzionati ). Tutti i record avranno questi campi:

Ragione; Indirizzo; Tel; Fax; Categoria;



L'utente che visualizza il sito accederà inizialmente alla pagina dedicata alle CATEGORIE (convenzionati.asp) e vedrà dei link sotto forma di elenco che riportano tutti alla pagina (leggi_convenzionati.asp). Quest'ultima in base a quale categoria l'utente ha scelto nella pagina precedente (convenzionati.asp) estrarrà dal database (facendoli visualizzare appunto nella pagina leggi_convenzionati.asp) solo ed unicamente i record che hanno nel campo "Categoria" la categoria prescelta, in modo tale da creare un elenco di attività che fanno parte solo ed unicamente della categoria prescelta nella pagina precedente.


Di seguito codice della pagina dedicata alle CATEGORIE "convenzionati.asp":

<%

'PERCORSO DEL DATABASE
url_DB = "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/database.mdb")

Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open url_DB

Set RS = Server.CreateObject("ADODB.Recordset")

'FA LA RICHIESTA AL DATABASE
SQL = "SELECT categoria FROM gestione_convenzionati ORDER BY CATEGORIA"
RS.Open sql, conn, adOpenKeyset

'CONTROLLA SE SONO PRESENTI LINK NEL DB
If RS.Eof = False Then

Do until RS.Eof
%>


<td>"><%=RS("Categoria")%></td>


<%
RS.Movenext
Loop

End IF

RS.Close
Conn.Close
Set Conn = Nothing
Set RS = Nothing
%>



Di seguito codice della pagina "leggi_convenzionati.asp":

<%

'PERCORSO DEL DATABASE
url_DB = "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/database.mdb")

Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open url_DB

Set RS = Server.CreateObject("ADODB.Recordset")

'FA LA RICHIESTA AL DATABASE IN MODO CHE RIPROPONGA SOLO I RECORD CHE HANNO NEL CAMPO "CATEGORIA" SOLO LA CATEGORIA SELEZIONATA DALL'UTENTE SULLA PAGINA PRECEDENTE "convenzionati.asp" (Es.: Abbigliamento, Edilizia, Sport, Etc.)
SQL = "SELECT * FROM gestione_convenzionati WHERE Categoria = " & Request.QueryString("Categoria") &" ORDER BY RAGIONE"
RS.Open sql, conn, adOpenKeyset

'CONTROLLA SE SONO PRESENTI LINK NEL DB
If RS.Eof = False Then

Do until RS.Eof
%>

<%=RS("Ragione")%>

<%=RS("Indirizzo")%>

<%if RS("Tel")<>"" then%>Tel: <%=RS("Tel")%><%end if%>
<%if RS("Fax")<>"" then%>
Fax: <%=RS("Fax")%><%end if%>

<%
RS.Movenext
Loop

End IF

RS.Close
Conn.Close
Set Conn = Nothing
Set RS = Nothing
%>



Aiutooooooooooo!! sto impazzendo

[alexba64]

Scusa ma cose' che non funziona ?

Estrarrà, conterrà....

Ma che vuol dire lo hai fatto sto script o lo hai fatto solo sua carta ?

La domanda qual'e', cosa vuoi sapere di preciso, se stai progettando nel modo corretto, se ci sono degli errori che ti vengono restituiti e se si dicci quali ?

[andreyax2]

la pagina leggi_convenzionati.asp non estrae nulla... da questo errore:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Categoria = Abbigliamento per la danza'.

/leggi_convenzionati.asp, line 217


line 216: SQL = "SELECT * FROM gestione_convenzionati WHERE Categoria = "& Request.QueryString("Categoria") &" ORDER BY RAGIONE"
line 217: RS.Open sql, conn, adOpenKeyset