ordinamento da link

[darlette]

Ciao a tutti, vorrei un consiglio su come realizzare il tipo di ordinamento che devo fare:
ho una tabella con dei dati, appena apro la pagina si visualizzano i record, nello specifico, ID, COGNOME, NOME_SERVIZIO, SCADENZA,
vorrei che cliccando su questi campi, i dati venissero ordinati in base al valore cliccato (crescente o decrescente).
Non so se mi sono spiegata bene, qualcuno può aiutarmi?

[OcchioCrepato]

Crea l'intestazione della tabella in questo modo
praticamente hai delle frecce con il link alla pagina di ricerca alla quale passi il campo* per il quale ordinare e il tipo di ordinamento

il campo deve essere quello del database

<table border="1">
<thead>
<th>
<td>ID &uarr; &darr;</td>
<td>COGNOME &uarr; &darr;</td>
<td>NOME_SERVIZIO &uarr; &darr;</td>
<td>SCADENZA &uarr; &darr;</td>
</th>
</thead>
....
</table>

Nella pagina asp

orderby =request.item("orderby")


sql="select * from tabella"
if orderby<>"" then
 sql=sql & " order by " & orderby
end if

oppure puoi farlo in Javascript
guarda gli esempi che trovi
qui
e qui


ciao

[darlette]

grazie mille....ci provo subito e poi ti faccio sapere!

[Mems]

Originariamente inviato da OcchioCrepato
Crea l'intestazione della tabella in questo modo
praticamente hai delle frecce con il link alla pagina di ricerca alla quale passi il campo* per il quale ordinare e il tipo di ordinamento

il campo deve essere quello del database

<table border="1">
<thead>
<th>
<td>ID &uarr; &darr;</td>
<td>COGNOME &uarr; &darr;</td>
<td>NOME_SERVIZIO &uarr; &darr;</td>
<td>SCADENZA &uarr; &darr;</td>
</th>
</thead>
....
</table>

Nella pagina asp

orderby =request.item("orderby")


sql="select * from tabella"
if orderby<>"" then
 sql=sql & " order by " & orderby
end if

oppure puoi farlo in Javascript
guarda gli esempi che trovi
qui
e qui


ciao

Perdonami, ma il tuo esempio è fallato, ovvero, è soggetto a SQL Injection.
Se io nella queryString passo "id (DELETE * FROM tabella)"
vedrai che verrà felicemente interpretato.

[OcchioCrepato]

Originariamente inviato da Mems
Perdonami, ma il tuo esempio è fallato, ovvero, è soggetto a SQL Injection.
Se io nella queryString passo "id (DELETE * FROM tabella)"
vedrai che verrà felicemente interpretato.

Giusta precisazione Mems

ovviamente bisogna effettuare dei controlli sulla stringa da passare.
l'ho dato per scontato che bisognasse fare dei controlli ma mi sa che era meglio dirlo

if InStr (1,orderby,"delete")=0 and InStr (1,orderby,"select")=0 and InStr (1,orderby,"update")=0 and InStr (1,orderby,"insert")=0 then
 if orderby<>"" then
  sql=sql & " order by " & orderby
 end if
end if

[Mems]

Io farei così: sui link per passare l'ordinamento metterei una queryString del tipo
?ord=1 che vuol dire, ad esempio, ID
?ord=2 che vuol dire, ad esempio, TITOLO
eccetera...
a questo punto, nella pagina asp

ord = request.queryString("ord")
if len(ord) > 0 and isNumeric(ord) then
ord = cLng(ord)
else
ord = 1
end if

select case ord
case 1
ordinamento = "ID"
case 2
ordinamento = "TITOLO"
case else
ordinamento = "ID"
end select

sql = "SELECT * FROM tabella ORDER BY " & ordinamento

[darlette]

non mi è molto chiaro perchè dovrei fare così:
ord = request.queryString("ord")
if len(ord) > 0 and isNumeric(ord) then
ord = cLng(ord)
else
ord = 1
end if

select case ord
case 1
ordinamento = "ID"
case 2
ordinamento = "TITOLO"
case else
ordinamento = "ID"
end select
Ho usato il primo metodo, solo che l'if l'ho messo prima della query, ho usato request.querystring e mi funziona .

Grazie.

[Mems]

Originariamente inviato da darlette
non mi è molto chiaro perchè dovrei fare così:
ord = request.queryString("ord")
if len(ord) > 0 and isNumeric(ord) then
ord = cLng(ord)
else
ord = 1
end if

select case ord
case 1
ordinamento = "ID"
case 2
ordinamento = "TITOLO"
case else
ordinamento = "ID"
end select
Ho usato il primo metodo, solo che l'if l'ho messo prima della query, ho usato request.querystring e mi funziona .

Grazie.

Contenta tu.
Ciao.

[darlette]

Ho fatto così:

<%Dim orderby
orderby=Request.QueryString("orderby")
%>
<%
If orderby = "" Then%>
<%
Set Rsv = Server.CreateObject("ADODB.Recordset")
Rsv.ActiveConnection = MM_cnmain_STRING
Rsv.Source = "SELECT * FROM servizi Order By nome_servizio"
Rsv.CursorType = 0
Rsv.CursorLocation = 2
Rsv.LockType = 1
Rsv.Open()

Rsv_numRows = 0
%>
<%Else%>
<%
Set Rsv = Server.CreateObject("ADODB.Recordset")
Rsv.ActiveConnection = MM_cnmain_STRING
Rsv.Source = "SELECT * FROM servizi Order By " & Replace(orderby,"'","''") & " "
Rsv.CursorType = 0
Rsv.CursorLocation = 2
Rsv.LockType = 1
Rsv.Open()

Rsv_numRows = 0
%>
<%end if%>




id[/b]
cognome
scadenza


Funziona...
perchè non va bene?

[Mems]

Perchè se nella URL della pagina dopo orderby=id_servizio
ci aggiungo un po di istruzioni SQL ti stiro il db.
Si chiama SQL Injection.