ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Организация динамического поиска
25 сообщений из 59, страница 1 из 3
  1  все
Организация динамического поиска
    #35204782
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
Как правльно организовать поиск в ленточной форме, чтобы при вводе каждого последующего символа в строку поиска, значения вформе фильтровались посимвольно.

например:
если ввести в строку поиска: "ко" в форме остались только записи начиноющиеся на "ко", если добавим к "ко" еще "м", то записи которые начинаются на "ком".

Кто такое реализовывал, просьба помочь!
...
Рейтинг: 0 / 0
20.03.2008, 22:14
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35204795
Фотография Программист-Любитель
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программист-Любитель
Участник
AfterUpdate поля фильтрация источника данных формы. Сложного ничего нет.
...
Рейтинг: 0 / 0
20.03.2008, 22:27
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35205223
Анатолий ( Киев )
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Анатолий ( Киев )
Гость
Лучше - событие Change.
Код: plaintext
1.
2.
3.
With Me![SubForm].Form
 .Filter = "[Поле] Like " & Me![Критерий].Text & "*"
 .FilterOn = True 
End With
Возможно понадобится и это (оставить курсор в конце текста):
Код: plaintext
1.
2.
With Me![Критерий]
 .SelStart = Len(.Text)
End With
...
Рейтинг: 0 / 0
21.03.2008, 10:25
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35205238
Фотография Программист-Любитель
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программист-Любитель
Участник
Не лучше, а правильно именно Change. Я написал не то, что подумал.
...
Рейтинг: 0 / 0
21.03.2008, 10:31
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207400
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
With Me![имя формы].Form
 .Filter = "[поле в котором происходит фильтрация] Like " & Me![поле по которому происходит фильтрация].Text & "*"
 .FilterOn = True 
End With
With Me![поле по которому происходит фильтрация]
 .SelStart = Len(.Text)
End With

Вы так имели ввиду? Так не работает, что неправильно? Подскажите пожалуйста!
...
Рейтинг: 0 / 0
22.03.2008, 12:37
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207431
Фотография alexmsp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alexmsp
Участник
не проверял
Код: plaintext
 .Filter = "[поле в котором происходит фильтрация] Like " & "'" & Me![поле по которому происходит фильтрация].Text & "*" & "'"
...
Рейтинг: 0 / 0
22.03.2008, 13:18
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207497
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
alexmspне проверял
Код: plaintext
 .Filter = "[поле в котором происходит фильтрация] Like " & "'" & Me![поле по которому происходит фильтрация].Text & "*" & "'"


Безрезультатно!
...
Рейтинг: 0 / 0
22.03.2008, 15:03
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207509
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
Для примера. Вставьте форму Поиск в учебную БД Борей. В текстовом поле набирайте шаблон для поиска в поле Сотрудники
...
Рейтинг: 0 / 0
22.03.2008, 15:26
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207594
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
mds_worldДля примера. Вставьте форму Поиск в учебную БД Борей. В текстовом поле набирайте шаблон для поиска в поле Сотрудники

Просмотрел, создал нечто подобное для своей базы. Получилось.
НО!
Возникают проблемы при совместном поиске по буквам и числам с пробелами.
Как это можно решить?
...
Рейтинг: 0 / 0
22.03.2008, 17:10
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207604
Фотография Александра-Александра
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Александра-Александра
Участник
А такой вариант подойдет?
...
Рейтинг: 0 / 0
22.03.2008, 17:20
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207653
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub Поиск_Change()
   Dim p, s
   p = Поиск.Text
   Me.Form.Filter = "Название Like '*" & p & "*'"
   Me.Form.FilterOn = True
   Me.Поиск.SelStart = Nz(Len(Me.Поиск),  0 )
   Me.Поиск.SelLength =  0 
End Sub

Хотелось бы разобраться, что здесь все-таки не так.!?
...
Рейтинг: 0 / 0
22.03.2008, 18:25
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207663
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
КолхозникХотелось бы разобраться, что здесь все-таки не так.!?
Не так здесь то, что вы пытаетесь фильтровать ту же форму в которой находится шаблон поиска. При фильтрации форма обновляется и все концевые пробелы исчезают. Так принять в микрософте. Можно, конечно, изогнуться и сделать с пробелами. Но стоит ли? Обычная практика, это когда форма в которой производят поиск и форма из которой ищут разделены. Шаблон поиска на главной форме (чаще всего эта форма без источника, просто контейнер для других форм), а форма в которой ищут - подформа. И тогда никаких проблем с обновлением формы нет. Ей просто не дают такой команды.
...
Рейтинг: 0 / 0
22.03.2008, 18:38
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207683
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
mds_world КолхозникХотелось бы разобраться, что здесь все-таки не так.!?
Не так здесь то, что вы пытаетесь фильтровать ту же форму в которой находится шаблон поиска. При фильтрации форма обновляется и все концевые пробелы исчезают. Так принять в микрософте. Можно, конечно, изогнуться и сделать с пробелами. Но стоит ли? Обычная практика, это когда форма в которой производят поиск и форма из которой ищут разделены. Шаблон поиска на главной форме (чаще всего эта форма без источника, просто контейнер для других форм), а форма в которой ищут - подформа. И тогда никаких проблем с обновлением формы нет. Ей просто не дают такой команды.

Так что же все-таки делать, если все есть как есть?
...
Рейтинг: 0 / 0
22.03.2008, 19:05
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35207717
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
КолхозникТак что же все-таки делать, если все есть как есть?
А вот примерно так можно сделать. (тоже на основе Борея)
...
Рейтинг: 0 / 0
22.03.2008, 19:40
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35210713
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
Код: plaintext
Me.Filter = "[поле в котором происходит фильтрация] Like " & "'" & Me![поле по которому происходит фильтрация].Text & "*" & "'"
Почему при выполнении этого кода поиск происходит только по 1 букве, почему он не дает полноразмерный поиск, как исправить?
...
Рейтинг: 0 / 0
24.03.2008, 20:45
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213498
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
UP!
Вопрос остается в силе!
Как сделать фильтр, если критерий поиска и записи находятся в 1 форме!!!
...
Рейтинг: 0 / 0
25.03.2008, 22:07
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213502
Фотография Restavraciya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Restavraciya
Участник
> Как сделать фильтр, если критерий поиска и записи находятся в 1 форме!!!

Лехко :-)

Перед тем как применить фильтр сохраните содержимое поля где вводите образец в глобальной переменной
После применения фильтра вернуть из глобальной в то поле и т.д.
...
Рейтинг: 0 / 0
25.03.2008, 22:18
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213511
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
А можно пример в студию...!
...
Рейтинг: 0 / 0
25.03.2008, 22:28
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213515
Фотография Restavraciya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Restavraciya
Участник
Пример чего ? мдб-файл что-ли ?

Из "Капитана Врунгеля"
- Мистер Фукс, у вас есть план ?
- А разве по мне не заметно ?

Объявляеш глобальную переменную в общем модуле
Далее по тексту пред.поста
...
Рейтинг: 0 / 0
25.03.2008, 22:36
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213520
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
RestavraciyaПример чего ? мдб-файл что-ли ?

Из "Капитана Врунгеля"
- Мистер Фукс, у вас есть план ?
- А разве по мне не заметно ?

Объявляеш глобальную переменную в общем модуле
Далее по тексту пред.поста

Прошу прощения, но мы говорим на разных языках, я просил пример кода...
...
Рейтинг: 0 / 0
25.03.2008, 22:44
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213529
Фотография Restavraciya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Restavraciya
Участник
Я говорю на русском, вы кажется тоже
Разности не наблюдаю

Ок. Попробую сваять
Если правильно понял нужно в ленточной/табличной/одиночной (любой) форме которая сидит на запросе в некое поле вводить образец чтобы он был фильтром для формы. Так?
И еще - это поле должно быть свободное или иметь источник данных ?
(спрашиваю чтобы не тратиь сил напрасно)
...
Рейтинг: 0 / 0
25.03.2008, 22:54
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213532
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
RestavraciyaЯ говорю на русском, вы кажется тоже
Разности не наблюдаю

Ок. Попробую сваять
Если правильно понял нужно в ленточной/табличной/одиночной (любой) форме которая сидит на запросе в некое поле вводить образец чтобы он был фильтром для формы. Так?
И еще - это поле должно быть свободное или иметь источник данных ?
(спрашиваю чтобы не тратиь сил напрасно)

Все именно так, поле должно быть свободное...
...
Рейтинг: 0 / 0
25.03.2008, 22:55
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213536
Фотография Restavraciya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Restavraciya
Участник
И еще - вам как нравиться: на изменение или на апдейт поля применять фильтр ?
Только не надо хотеть всего и сразу - ограничтесь самым необходимым.
;-)
...
Рейтинг: 0 / 0
25.03.2008, 22:59
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213538
Колхозник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Колхозник
Участник
RestavraciyaИ еще - вам как нравиться: на изменение или на апдейт поля применять фильтр ?
Только не надо хотеть всего и сразу - ограничтесь самым необходимым.
;-)

На изменение - Change
...
Рейтинг: 0 / 0
25.03.2008, 23:01
| Ответить | Цитировать | Написать  
Организация динамического поиска
    #35213539
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
Колхозник,
в первом варианте, который я давал в посте от 15:26, измените процедуру поиска на
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub Поиск_Change()
    Dim p, s
    p = Поиск.Text
    Me.Form.Filter = "Фамилия Like '*" & p & "*'"
    Me.Form.FilterOn = True
    Me.Поиск.SetFocus
    Me.Поиск = p
    SendKeys "{f2}"
End Sub
И пойдет с пробелами
...
Рейтинг: 0 / 0
25.03.2008, 23:02
| Ответить | Цитировать | Написать  
25 сообщений из 59, страница 1 из 3
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Организация динамического поиска
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=35205223&tid=1610869]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 156ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 71ms
get tp. blocked users:
 1ms
others: 228ms
total:  495ms
созд. / загр.: 495ms
x
x
Закрыть


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