Lo so che sono scarsa

[Alyssa]

Perchè non riesco a far funzionare questa query inserendo between???
Senza between funziona tutto, qualcuno mi aiuta?

Recordset2.Source = "SELECT * FROM IMMOBILI WHERE provincia LIKE '" + Replace(Recordset2__varProvincia, "'", "''") + "' AND tipologia LIKE '" + Replace(Recordset2__varTipologia, "'", "''") + "' AND costo between '" + Replace(Recordset2__varCostoda, "'", "''") + "' AND '" + Replace(Recordset2__varCostoa, "'", "''") + "' "

[deleted_c]

costp è un numero è una stringa?!
rispondi a questo ed avrai la soluzione

[saucer]

inoltre consiglio di utilizzare anche le parentesi.......( le hanno inventate anche per questo :P )

[Alyssa]

Hai ragione è un numero, ma non sò veramente come fare e cosa devo modificare...
Please...

[saucer]

prima di tutto, ti consiglio di fare quanto segue :

- le funzioni di conversione, falle all'esterno della query
- utilizza parentesi tonde quando servono.

Passiamo allo script

strprovincia = Replace(Recordset2__varProvincia, "'", "''")
strtipologia = Replace(Recordset2__varTipologia, "'", "''")
strcostoda = Replace(Recordset2__varCostoda, "'", "''") 
strcostoa = Replace(Recordset2__varCostoa, "'", "''")

Recordset2.Source = "SELECT * FROM IMMOBILI WHERE ( provincia LIKE '" & strprovincia & "' ) AND ( tipologia LIKE '" & strtipologia & "' ) AND ( costo between " & strcostoda & " AND " & strcostoa & ") "

Ciao

[Alyssa]

mi dà errore... alla linea 19

<%@LANGUAGE="VBSCRIPT"%>

<%strprovincia = Replace(Recordset2__varProvincia, "'", "''")
strtipologia = Replace(Recordset2__varTipologia, "'", "''")
strcostoda = Replace(Recordset2__varCostoda, "'", "''")
strcostoa = Replace(Recordset2__varCostoa, "'", "''")
%>
<%
Dim Recordset2
Dim Recordset2_numRows

Set Recordset2 = Server.CreateObject("ADODB.Recordset")
Recordset2.ActiveConnection = MM_prova_STRING
Recordset2.Source = "SELECT * FROM IMMOBILI WHERE ( provincia LIKE '" & strprovincia & "' ) AND ( tipologia LIKE '" & strtipologia & "' ) AND ( costo between " & strcostoda & " AND " & strcostoa & ") "

Recordset2.CursorType = 0
Recordset2.CursorLocation = 2
Recordset2.LockType = 1
Recordset2.Open()

Recordset2_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
Recordset2_numRows = Recordset2_numRows + Repeat1__numRows
%>

[saucer]

modifica :

Recordset2.Source = "SELECT * FROM IMMOBILI WHERE ( provincia LIKE '" & strprovincia & "' ) AND ( tipologia LIKE '" & strtipologia & "' ) AND ( costo between " & strcostoda & " AND " & strcostoa & ") "

con

sql = "SELECT * FROM IMMOBILI WHERE ( provincia LIKE '" & strprovincia & "' ) AND ( tipologia LIKE '" & strtipologia & "' ) AND ( costo between " & strcostoda & " AND " & strcostoa & ") "
Recordset2.Source = sql

e poi prima di

Recordset2.Open()

scrivi
Response.Write sql : Response.end

Prova la query in Access e vedi che ti dice.
Ciao

[Alyssa]

Mi da questa scritta sulla pagina dei risultati..

SELECT * FROM IMMOBILI WHERE ( provincia LIKE '' ) AND ( tipologia LIKE '' ) AND ( costo between AND )
Grazie cmq sei molto gentile e paziente...

[Corwin]

Così ad occhio direi che Recordset2__varProvincia, Recordset2__varTipologia, Recordset2__varCostoda e Recordset2__varCostoa sono vuoti...

[saucer]

Ulteriore consiglio : Non utilizzare Macromedia Dreamweaver per scrivere ASP..... o meglio....utilizzalo, ma non utilizzare i suoi wizard o i suoi codici preconfezionati.


l'errore è che quei valori da cui tui fai il replace, sono vuoti.


Devi prima fare una select....da quella prendere i dati che ti interessano e farne il replace.

Poi applichi la select che t'ho scritto e sei a cavallo


Ciao