поиск по слову

Александра-Александра

Дата: 04.03.2008 14:30:34

Здравствуйте...

Сделала поиск по слову (или его части). Это часть кода:

strSQL = "SELECT NPP, Nazv_Texta, Text, TimeEdit" _
    & " FROM tblBook" _
    & " WHERE ((tblBook.Nazv_Texta) LIKE '*" & strKrit & "*')" _
    & " OR ((tblBook.Text) LIKE '*" & strKrit & "*')"

Я делаю поиск в названии текста и в самом тексте. Поиск работает нормально.

Возможно ли следующее. Так как слов в поле "Text" много, возможно ли подвинуть текст в этом поле таким образом, чтобы найденное слово было видно в этом поле?

Всем спасибо и хорошего настроения...

С уважением,
Александра

Дата: 04.03.2008 14:41:10

если полн Текст в нескольких запясях то нет
можно добавить поле в запрос куда вывести найденоое слово
это поле можно показывать сверху Текст-а и по например даблклику переходить на поле текст с выделением найденного (все об одной записи)

Александра-Александра

Дата: 04.03.2008 14:46:35

Я что-то не поняла идею...
Результаты поиска у меня показываются в ленточной форме. Мне нужно строку с найденным словом подвинуть таким образом, чтобы это слово было видно в поле этой ленточной формы результатов поиска...

бухой бык

Дата: 04.03.2008 14:49:11

Александра-Александра

подвинуть текст в этом поле

Вы про форму! Да?:)

бухой бык

Дата: 04.03.2008 14:50:22

тормознул... это я сам догадался что вы про форму.
найти instr и потом selstart

Дата: 04.03.2008 14:51:29

что непонятного ?
показать МОЖНО (по вопросу) но не во всех записях одновременно
доп поле - не понятно? в него выводим СЛОВО найденное
поле СВЕРХУ поля Текст. даблклик по Найденному полю - переход в поле текст с выделением
то есть всегда видно найденное

Александра-Александра

Дата: 04.03.2008 15:01:18

А... теперь понимаю... :)

Но, кажется, это не то, что мне сейчас нужно...
Вам большое спасибо...

Александра-Александра

Дата: 04.03.2008 15:03:10

бухой бык

тормознул... это я сам догадался что вы про форму.
найти instr и потом selstart

Спасибо...

Попробую разобраться с этим...

Polev

Дата: 04.03.2008 15:04:02

бухой бык

тормознул... это я сам догадался что вы про форму.
найти instr и потом selstart

В ленточной? Прокатит?

rok

Дата: 04.03.2008 16:13:14

Попробуйте так:
На форме разместите выключатель46 с подписью "поиск по тексту"и поле44 для введения критерия
поиска.В поле "текст" (в данном случае "фамилия") появится первая запись, соответствующая критерию,по мере ввода символов число отобранных записей будет сокращаться. Я думаю в ленточной форме(все зависит от ее размеров) будут отображаться все отобранные записи-сколько войдет.

Private Sub Выключатель46_Click()
If Me.Выключатель46 = -1 Then
Me.Поле44.Value = ""
Me.Поле44.Visible = True
Me.Поле44.SetFocus
Else
Me.Поле44.Visible = False
DoCmd.ShowAllRecords
Me.OrderByOn = True
End If
End Sub

Private Sub Поле44_GotFocus()
Me.Поле44.SelStart = Len(Me.Поле44.Text)
End Sub

Private Sub Поле44_KeyUp(KeyCode As Integer, Shift As Integer)
DoCmd.ApplyFilter , "Фамилия like '" & Me.Поле44.Text & "*'"
End Sub