Технологии программирования (MS ACCESS, VBA, VB, ASP) - Отбор записей формы по мере ввода символов в поле

Отбор записей формы по мере ввода символов в поле

Автор sample

28.01.2009 г.

Пример фильтрации записей формы соответствующих условию введенному в поле.

Фильтрация происходит по мере ввода символов в поле фильтрации.

Отбор записей формы по мере ввода символов в поле

Коментарии (15)

1 Написал(а) час, в 10:18 28.01.2009

тоже очень удобно!!!

2 Написал(а) Скорп, в 21:18 29.01.2009
я бы в код добавил On Error Resume Next, т.к. если на форме убрать возможность добавления новой записи и начать вводить в поле поиска слово, которого нет на форме, то выпадает ошибка...

3 Написал(а) Сергей, в 23:42 01.02.2009
Думаю если изменить фильтр на
Me.Filter = "[Название] Like '*" & strFind & "*'"
так будет интересней, что бы избежать повторений в базе типа

Toms Spezialitaten
Spezialitaten Toms

будет искать везде

4 Написал(а) -=GoS=-, в 12:53 05.02.2009
В поле поиска не работает пробел :cry

5 Написал(а) Один, в 19:32 15.04.2009
Отлично. Особенно в совокупности с другими предложениями, что ниже. Очень не плохо.
А по поводу пробела - форму можно и на запрос сделать.

6 Написал(а) Олег, в 20:25 18.04.2009
Ну где я уже видел подобное тут же на сайте, только там сделано было на все поля формы и в табличном виде.
А нельзя ли совместить с тем, что бы если записи нет, то она предлагала бы добавить ее в таблицу?

7 Написал(а) Этот e-mail защищен от спам-ботов. Для его просмотра в вашем браузере должна быть включена поддержка Java-script , в 07:10 17.05.2009
а если по нескольким полям с сохранением предыдущего фильтра?

8 Написал(а) Этот e-mail защищен от спам-ботов. Для его просмотра в вашем браузере должна быть включена поддержка Java-script , в 05:20 28.07.2009
А как сделать чтобы пробел работал???

9 Написал(а) Навруз, в 07:07 30.07.2009
ms access 2003 английская версия не открывает и можете ответит на вопросы других "комментаторов"?

10 Написал(а) osmor, в 14:04 30.07.2009
bogv167,Street racer, Навруз и все остальные
Автор может сюда вообще никогда не зайти.
Вопросы нужно задавать в форуме. http://hiprog.com/forum/
Навруз, в английкой работать не будет, это известная фича Access, связанная с тем, что в национальный версиях MSA контролы (в том числе и секции форм) именуются с импользованием национальных символов.

Пример фильтрации записей формы соответствующих условию введенному в поле.

Фильтрация происходит по мере ввода символов в поле фильтрации.

Отбор записей формы по мере ввода символов в поле

Коментарии (15)

11 Написал(а) Feel, в 07:50 06.07.2010
заставить заработать пробел достаточно просто:

Private Sub Поиск_KeyPress(KeyAscii As Integer)
LastKey = KeyAscii
End Sub

а в обработчик Private Sub Поиск_Change()
добавить сравнение с последней нажатой клавишей (пробел 32)
If LastKey = 32 Then Поиск = Поиск & " "
перед strFind = Nz(Me!Поиск.Text, "")

без усилий прикрутить еще и откат последнего нажатия, если поиск ничего не приносит: strFind = Left(strFind, Len(strFind) - 1). ну и очевидно, что поиск можно организовать сразу по нескольким полям, перечислив их в фильтре:
Me.Filter = "[Поле1] Like '*" & strFind & "*' " & _
"OR [Поле2] Like '*" & strFind & "*'"

если поле для поиска в области данных в форме, необходимо будет обрабатывать ошибку 2185, если не будет совпадений. да и вообще, есть где развернуться, хороший пример

12 Написал(а) sample, в 08:21 06.07.2010
Feel, спасибо за комментарий.
Для того что бы работал пробел, можно просто в существующий код
после
strFind = Nz(Me!Поиск.Text, "")
добавить
Me!Поиск = strFind

13 Написал(а) mikhail, в 13:27 12.07.2010
Спасибо за пример оч помог. Я абсолютно не разбираюсь в VBA, Feel, не моглибы Вы подсказать как отбирать значения используя другие поля таблицы с учетом уже созданного отбора??? Заранее спасибо!

14 Написал(а) Этот e-mail защищен от спам-ботов. Для его просмотра в вашем браузере должна быть включена поддержка Java-script , в 11:11 04.09.2011
Отличный пример, мне, кажется, очень пригодится...

15 Написал(а) Этот e-mail защищен от спам-ботов. Для его просмотра в вашем браузере должна быть включена поддержка Java-script , в 09:20 23.03.2012
У меня есть база данных, состоящая из 8000 записей. Мне необходимо создать аналогичную форму для поиска, однако я не силен в SQL (к сожалению)
Есть кто-нибудь, кто не против помочь?
мой e-mail Этот e-mail защищен от спам-ботов. Для его просмотра в вашем браузере должна быть включена поддержка Java-script

Добавить коментарий
Имя:
E-mail
Коментарий:
Код:*