VPF::фильтрация данных в подчинённой форме

Perun

Дата 16.4.2008, 16:26 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 180
Регистрация: 15.8.2007
Где: Краснодар

Репутация: нет
Всего: нет

Задача следующая(на форуме не нашёл): есть подчинённая форма.
В основной форме в ComboBox выбирают год, филиал и отчётный период. По этим полям должны отфильтроваться данные в подчинённой формы(таблица).
Подчинённое поле - КодПодразделения(филиала) - по нему отбор сделал,
а как по остальным полям отфильтровать?

Akina

Дата 17.4.2008, 08:13 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454

Цитата(Perun @ 16.4.2008, 17:26

)

как по остальным полям отфильтровать?

Варианты:
- включить указанные поля в услови отбора;
- динамически менять .Filter подчиненной формы.

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

Perun

Дата 17.4.2008, 09:41 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 180
Регистрация: 15.8.2007
Где: Краснодар

Репутация: нет
Всего: нет

Принцип я понял, но ещё не освоился с синтаксисом VBA.
Что не так в моём коде
Фильтрую по году:

Код


Private Sub Поиск_Год_AfterUpdate()
Dim s As String
s = Me.Поиск_Год
Me.frm_ВторичныйДосмотрПодчинённая.Form.Filter = "Год = '" & s & "'"
Me.frm_ВторичныйДосмотрПодчинённая.Form.FilterOn = True
.......

Это сообщение отредактировал(а) Perun - 17.4.2008, 09:41

Perun

Дата 17.4.2008, 10:44 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 180
Регистрация: 15.8.2007
Где: Краснодар

Репутация: нет
Всего: нет

Почему не происходит отбор записей?
Вся таблица пустая!

Perun

Дата 17.4.2008, 11:55 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 180
Регистрация: 15.8.2007
Где: Краснодар

Репутация: нет
Всего: нет

Получилось с годами, а как со строкой быть.
Её данными является число(в основную таблицу пишется индекс периода, а отображается название)

Perun

Дата 17.4.2008, 13:17 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 180
Регистрация: 15.8.2007
Где: Краснодар

Репутация: нет
Всего: нет

получилось отфильтровать!!!!
А как объединить фильтры(програмно)?
В 1 строку условия уместить???

Добавлено через 12 минут и 58 секунд
Все объединил!!!
через And:
(((Контроль_БД.Год=" & year & "))) And (Lookup_КодОтчПериода.НаимОтчПер='" & s & "'")
........
Сам спросил сам ответил smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| MS Access \| Следующая тема »