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