Пожалуйста, укажите, в чем моя ошибка!
Итак, беру строку пользователя (в данном случае - 'commander total', хотя в других случаях читуация аналогичная), разбиваю ее на отдельные слова и составляю вложенный запрос:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
TextArray = Split(t_text)
If UBound(TextArray) > 0 Then
sqlstring = "(select * from cat where dkeywords like '%" + TextArray(UBound(TextArray)) + "%') as temptbl" + Trim$(Str$(UBound(TextArray)))
For n = 1 To UBound(TextArray) - 1
sqlstring = "(select * from " + sqlstring + " where dkeywords like '%" + TextArray(n) + "%') as temptbl" + Trim$(Str$(n))
Next
sqlstring = "select * from " + sqlstring + " where dkeywords like '%" + TextArray( 0 ) + "%' as temptbl0"
Else
sqlstring = "select * from cat where dkeywords like '%" + TextArray( 0 ) + "%'" '-на случай, если в строке было только одно слово
End If
Debug.Print sqlstring
Adodc1.RecordSource = sqlstring
Adodc1.Refresh
По достижении места "Adodc1.refresh" получаю такую вот шляпу : "Incorrect syntax near the keyword 'where'".
К этому времени Дебаггер вернул следующий сформированный запрос:
select * from (select * from cat where dkeywords like '%total%') where dkeywords like '%commander%'
ПАМАЖИТЕ, кто чем сможет!!!
