problema di validazione

[maxcondor]

Con il codice sotto riportato realizzo un sistema di paginazione, tutto funziona perfettamente, tranne che per un problema nella validazione.
Se non riempio tutti i campi del form di ricerca, la query prende dei parametri di default. In questo modo però il link della paginazione si porta dietro alcuni parametri vuoti, generando un'errore di validazione della pagina, anche se il sistema funziona correttamente. Qualche suggerimento?
<%@LANGUAGE="VBSCRIPT"%>


<%
'Numero di record visualizzati per pagina
Record_Pagina = 3
'Numero di Pagine visualizzate nei link
Numerazione_Max = 6
Dim Rec__varfdata1, Rec__varfdata2, Rec__oggetto, Rec__appalto, Rec__gara
Rec__varfdata1 = "01/01/2000"
If (Request("f_datas") <> "") Then
Rec__varfdata1 = Request("f_datas")
End If
Rec__varfdata2 = "31/12/2010"
If (Request("f_datas2") <> "") Then
Rec__varfdata2 = Request("f_datas2")
End If
Rec__oggetto = "'%%'"
If (Request("f_oggetto") <> "") Then
Rec__oggetto ="'%"&Request("f_oggetto")&"%'"
End If
Rec__appalto = "idappalto between 0 and 9999"
If (Request("f_appalto") <> "") Then
Rec__appalto ="idappalto="&Request("f_appalto")
End If
Rec__gara = "idgara between 0 and 9999"
If (Request("f_gara") <> "") Then
Rec__gara ="idgara="&Request("f_gara")
End If



Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open (MM_conn_bandi_STRING)

sql = "SELECT * FROM bandi where scadenza between #"+ Rec__varfdata1 +"# and #" + Rec__varfdata2 +"# and oggetto like "+Rec__oggetto+" and "+Rec__appalto+" and "+Rec__gara+" Order by scadenza desc"
Set Rec = Server.CreateObject ("ADODB.Recordset")
Rec.PageSize = Record_Pagina
Rec.Open sql, Conn, 3, 3
'Recupero il numero della pagina corrente
Pag = CInt(Request.Querystring("pag"))
'Controllo che il numero di pagina sia corretto
If (Not Rec.Eof) Then
If Pag>Rec.PageCount Then
Pag = Rec.PageCount
End If
If Pag = 0 Then
Pag = 1
End If
'Setto la pagina corrente
Rec.AbsolutePage = Pag
Rec_total = Rec.Recordcount
'Ora prepariamo i link alle pagine
indice_inizio = pag-(Numerazione_Max/2)
If (indice_inizio>(Rec.PageCount-Numerazione_Max)) Then
indice_inizio = Rec.PageCount-Numerazione_Max+1
End If
If (indice_inizio<=0) Then
indice_inizio = 1
End if
indice_fine=indice_inizio+Numerazione_Max-1
If (indice_fine>Rec.PageCount) Then
indice_fine = Rec.PageCount
End If
'Link alla prima pagina
Link = "&laquo; |"
'Link alle pagine precedenti
If (indice_inizio<>1) Then
Link=Link&" precedente |"
End If
For i=indice_inizio to indice_fine
'Pagina attuale
If (i=pag) then
Link = Link&" [ "&i&" ] "
'Link alle altre pagine
Else
Link = Link&"[ "&i&" ] | "
End If
Next
'Link alle pagine successive
If (indice_fine<Rec.PageCount-1) Then
Link = Link&" succesiva | "
End If
'Link all'ultima pagina
Link=Link&" &raquo; "
End If
%>

[Roby_72]

Devi costruire tutta la stringa di query che agggiungi nella paginazione in maniera dinamica, ovvero mettere i parametri nel link solo se risultano effettivamente pieni (dal form).
La modifica al volo che puoi fare è mettere nel link ell paginazione la request del parametro e non la variabile artificiale costruita da te.

Roby

[maxcondor]

scusami quale sarebbe la variabile costruita artificialmente da me?
potresti farmi un esempio? Non ho capito dove devo agire per risolvere il problema

[Roby_72]

Questa ad esempio:

If (Request("f_oggetto") <> "") Then 
Rec__oggetto ="'%"&Request("f_oggetto")&"%'" 
End If

Crei ariabili ad uso e consumo della query che fai dopo... però le stesse variabili le metti nel link della paginazione e quindi varranno sempre qualcosa...
Nei link metti la Request("f_oggetto"), ad esempio, al posto della variabile.

Roby

[maxcondor]

sto provando...

[maxcondor]

perdonami ma la testa non mi funziona più.... ma nei miei link non utilizzo già il request? boh sono fuso... mandami pure a quel paese...

[Roby_72]

Cavolo... VVoVe:
Non avevo visto...
Ad ogni modo devi costruire la stringa nei link in maniera dinamica.

sLink = ""
If (Request("f_oggetto") <> "") Then 
sLink = slink &"&f_oggetto = "& Request("f_oggetto")
End If 
...
...

e così per ogni elemento dei link.
Alla fine la variabile sLink conterrà SOLO i parametri pieni.

Roby

[maxcondor]

stavolta mi sa che siamo sulla strada giusta... ti farò sapere... grazie mille

[maxcondor]

ho scritto questo orrore....

Link = "http://"") Then f_data =request("f_d...""40"">&laquo; |"

ma ovviamente mi dà errore.. sono comunque sulla strada giusta?

[Roby_72]

No.
Devi seguire il mio suggerimento: creare prima la variabile sLink.

Roby