Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: 1 2 [3]  Все   Вниз
  Печать  
Автор Тема: Поиск записи в Access  (Прочитано 128912 раз)
0 Пользователей и 1 Гость смотрят эту тему.
HandKot
Молодой специалист

ru
Offline Offline

« Ответ #60 : 14-09-2012 04:12 » 

странно, у меня такого не наблюдается
на форме расположил обычный textbox и вводится туда все, что угодно
если есть возможность, вылодите свой проект или создайте новый пустой проект, создайте там форму подобную показанной и выложите его
Записан

I Have Nine Lives You Have One Only
THINK!
ivanov2000
Новенький

ru
Offline Offline

« Ответ #61 : 17-09-2012 21:24 » 

HandKot, огромное спасибо за помощь! Вот файл -

* Database1.accdb (620 Кб - загружено 960 раз.)
Записан
HandKot
Молодой специалист

ru
Offline Offline

« Ответ #62 : 19-09-2012 05:14 » 

замените свою процедуру, осуществляющую поиск, следующей
Код:
Private Sub Поиск_Change()

    Dim rst As DAO.Recordset

    'полуучаем набор записей для поиска
    Set rst = Me.Recordset.Clone
    'делаем поиск
    rst.FindFirst "[ЛПУ] like '*" & Поиск.Text & "*'"
   
    Debug.Print rst.NoMatch
   
    'если неудачно, то просто выходим
    If rst.NoMatch Then Exit Sub
   
    'иначе переходим на найденнную запись
    Me.Bookmark = rst.Bookmark
   
    'встаем в поле поиска
    Поиск.SelStart = Len(Поиск.Text)
End Sub

должно работать
Записан

I Have Nine Lives You Have One Only
THINK!
ivanov2000
Новенький

ru
Offline Offline

« Ответ #63 : 19-09-2012 08:37 » 

HandKot, огромное спасибо за помощь, ещё раз! Все работает.
Записан
HandKot
Молодой специалист

ru
Offline Offline

« Ответ #64 : 21-09-2012 03:54 » new

кстати, тут подумалось
что можно вместо текстбокса использовать комбобокс (поле со списком)
в настройках указать, что для поиска записей
Записан

I Have Nine Lives You Have One Only
THINK!
Страниц: 1 2 [3]  Все   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines