errore query

[scura]

ciao a tutti perchè mi dà questo errore ?

'Errore di sintassi (operatore mancante) nell'espressione della query'


set adoRs = Server.CreateObject("ADODB.Recordset")

sSql = "Select * from tblLeggi where "

Dim mioArray, i
mioArray=split(valore, " ")

For i = 0 to Ubound(mioArray)

sSql= sSql & "key = '" & mioArray(i) &"'"

next

adoRs.open sSql, adoConn, 3, 3

[weppos]

PRova a stampare la query e verificare cosa restituisce.

[scura]

grazie Weppos stampa questo "Select * from tblLeggi where key = 'data'key = 'buono' "

quindi manca un end oppure un or vero?

[optime]

set adoRs = Server.CreateObject("ADODB.Recordset") 

sSql = "Select * from tblLeggi where 1=1 " 

Dim mioArray, i 
mioArray=split(valore, " ") 

For i = 0 to Ubound(mioArray) 

sSql= sSql & " AND key = '" & mioArray(i) &"'" 

next 

adoRs.open sSql, adoConn, 3, 3

[weppos]

AND o OR a seconda di cosa vuoi fare.

[neryo]

Scusa,
ma guarda che manca un 'and' o un 'or' alla fine della tua concatenazione

For i = 0 to Ubound(mioArray)

sSql= sSql & "key = '" & mioArray(i) &"'" 
sSql = sSQL & "or "
next

Altrimenti concateni key = n key = x ecc..