powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Решение! Поиск в столбце (по нескольким словам)
1 сообщений из 1, страница 1 из 1
Решение! Поиск в столбце (по нескольким словам)
    #32184711
Geen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Часто бывает нужно провести поиск по частям текста.
Предлагаю всем свое решение проблемы:)
Правда баз Владимира Саныча не смог бы ничего сделать:)

Итак:
Имеется поле Р6, которое содержит текст "Генеральный директор" (должность).
Требуется провести поиск в таблице dbo.P(вледелец.таблица)
тех записей, которые содержат в столбце dbo.P.P (должность) слова "генеральный" или "директор",
а так же число в столбце dbo.P.Age (возраст) которое находится
в диапазоне между P8 и P10 (полями в форме возраст от и до)
Результат поиска по нажатию кнопки Btn12 нужно выдать в список SP1

Решение:

Private Sub Btn12_Click()
Dim WHR12 As String
Dim B As Variant, C As Variant, A As String, S As String
A = Me.P6
B = Split(A, " ")
S = ""
For Each C In B
If S > "" Then S = S & " OR "
S = S & "(dbo.P.P LIKE " & "'" & "%" & C & "%" & "')"
Next
WHR12 = "SELECT dbo.P.P, dbo.P.Age From dbo.P" _
& " WHERE " & S & "" _
& " AND (dbo.P.Age > '" & Me.P8 & "')" _
& " AND (dbo.P.Age < '" & Me.P10 & "')"
Me.SP1.RowSource = WHR12
End Sub

Где WHR12 - строковая переменная, которая является источником
строк для списка SP1

Надеюсь, кому-нибудь пригодится
Geen
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Решение! Поиск в столбце (по нескольким словам)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]