quindi avevo capito!
a questo punto io splitterei tutte le parola di ricerca in un'array e mi farei un ciclo che mi scrive la LIKE per ogni chiava di ricerca!!
se diciamo che il separatore delle parole da usare come chiave è lo spazio:
codice:
Dim aryKey() As String
Dim i As String
strSQL = "SELECT * FROM PRODOTTI "
aryKey = Split(txtParole.Text, " ") 'splitto le chiavi in un'array
if ubound(arykey) > 0 then strSQL = strSQL & " WHERE NOME LIKE '%" & arykey(0) & "' " 'scrivo la prima volta la condizione, con il where
For i=1 to Ubound(aryKey) 'scrivo una like per ogni keyword successiva
strSQL = strSQL & "OR NOME LIKE '%" & arykey(i) & "%' "
Next i
strSQL = strSQL & "ORDER BY NOME" 'ultimo la stringa
ti gusta come idea?
..dovrebbe essere qlcosa di pseudo-funzionate.. è un po' che non tocco il vecchio amato VB..