if sel_ses = "" and sel_reg = "*" and sel_prov = "*" then

[Lino80]

se cerco:

Tipologia: APPARTAMENTO
Località: TUTTE
Prezzo: TUTTI

mi stampa: WHERE immobile = 'appartamento' OR località ='' OR prezzo ='' ORDER BY ID

mi da i risultati giusti alla prima pagina però poi cliccando sulla seconda pagina ( http://www10.asphost4free.com/aspasp...rca.asp?page=2 ) mi ritrovo con tutti i risultati cioè 4 pag su 4 e non 2 su 2

[Lino80]

stampando a video: response.write strSQL

e cercando:

Tipologia: APPARTAMENTO
Località: TUTTE
Prezzo: TUTTI

mi stampa:

SELECT * FROM tabella WHERE immobile = 'appartamento' OR località ='' OR prezzo ='' ORDER BY ID

[Roby_72]

Quei filtri a mio aivviso devono essere validi in contemporanea quindi metterei una AND al posto della OR.
Le scelte effettuate devi passarle in querystring nei link della paginazione.
Altrimenti dopo la prima pagina muoiono...

Roby

[Lino80]

ho cambiato da OR a AND qui:

if sel_ses <> "" and sel_reg <> "*" and sel_prov <> "*" then
strRicerca = " WHERE immobile = '"& sel_ses &"' AND località ='"& sel_reg & "' AND prezzo ='"& sel_prov & "' ORDER BY ID"

ma ora cercando

Tipologia: APPARTAMENTO
Località: TUTTE
Prezzo: TUTTI

non mi da nessun risultato come mai?

[Roby_72]

Quando la localita e il prezzo sono TUTTI nella WHERE non ce li devi mettere ovviamente visto che devi prendere tutto.

Roby

[Mems]

La form di ricerca DEVE AVERE method="get"

<%
dim objConn
set objConn = server.createobject("ADODB.Connection")
objConn.open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = "&_
Server.MapPath("mdb-database\ecom.mdb")
sel_ses = request.queryString("immobile")
sel_reg = request.queryString("località")
sel_prov = request.queryString("prezzo")

Dim strRicerca

if len(sel_ses) > 0 then
strRicerca = strRicerca & " AND immobile = '" & sel_ses & "'"
end if

if len(sel_reg) > 0 then
strRicerca = strRicera & " AND località = '" & sel_reg & "'"
end if

if len(sel_prov) > 0 then
strRicerca = strRicerca & " AND prezzo = '" & sel_prov & "'"
end if

strRicerca = strRicerca & " ORDER BY ID"

iPageSize = 2 'NUMERO RECORD PER PAGINA

If Request.QueryString("page") = "" Then
iPageCurrent = 1
Else
iPageCurrent = CInt(Request.QueryString("page"))
End If

dim objRS, strSQL
set objRS = server.createobject("ADODB.Recordset")
strSQL = "SELECT * FROM tabella WHERE 1 = 1"
strSQL = strSQL & strRicerca
objRS.PageSize = iPageSize
objRS.CacheSize = iPageSize
objRS.open strSQL, objConn, adOpenStatic, adLockReadOnly, adCmdText

reccount = objRS.recordcount
iPageCount = objRS.PageCount
%>

Nei link alle pagine successive devi aggiungere alla queryString, oltre al numero pagina anche

"... &sel_ses=" & sel_ses & "&sel_reg=" & sel_reg & "&sel_prov=" & sel_prov & "

Così nella paginazione ti porti appresso anche i parametri di ricerca.

[Lino80]

grazie mems ora funziona meglio, devo ancora aggiungere cmq:

"... &sel_ses=" & sel_ses & "&sel_reg=" & sel_reg & "&sel_prov=" & sel_prov & "

ho provato a cercare:

Tipologia: APPARTAMENTO
Località: TRECASTAGNI
Prezzo: TUTTI

mi trova 2 record ovvero:

1° appartamento - trecastagni

2° villa singola - trecastagni


come mai mi trova anche "villa singola"?

prova anche tu se vuoi: http://www10.asphost4free.com/aspasp...ogo.asp?scat=6

[Mems]

Fai response.write strSQL dopo sta riga
strSQL = strSQL & strRicerca

[Lino80]

SELECT * FROM tabella WHERE 1 = 1 AND località = 'trecastagni' ORDER BY ID

[Mems]

Non arriva il valore immobile dalla form.
1. Il campo dove selezioni il tipo di immobile come si chiama?

2. Dopo questo:
sel_ses = request.queryString("immobile")
sel_reg = request.queryString("località")
sel_prov = request.queryString("prezzo")

metti:
response.write "Immobile: " & sel_ses & "
"
response.write "Località: " & sel_reg & "
"
response.write "Prezzo: " & sel_prov & "
"