Условие отбора формы по полю подчиненной формы

@sashk0 · Регистрация: 14.03.2012

Студворк — интернет-сервис помощи студентам

Доброго времени суток!

Есть такая проблема, не могу разобраться:
Есть основная форма "ОсновнаяФорма" в ней находится подчиненная табличная форма с названием "ФормаЗапрос2". В этой форме есть поле "Системный счетчик", для этого поля я создаю событие которое при двойном клике мышью открывает форму "Form1", в которую в свою очередь входит опять же табличная форма "ТабличнаяФормаЗапрос210ЛЗС".

И вот тут надо задать фильтр для поля "ЛЗС-код" в форме "Form1". Т.е. при двойном клике мы открываем форму "Form1" в которой отображаются записи соответствующие только данным из поля "Системный счетчик" основной формы.

Когда я обращался напрямую к табличной форме то я делал это так:
задаем переменную "ИдСчт" для для поля [Системный счетчик]. Далее выбираем "Открыть форму", выбираем открытие формы "Form1", в условии отбора указываем [ЛЗС-СистСчетч]=[TempVars]![ИдСчт]. Т.е. тут всё очень легко, мы открываем форму и задаем ей условие фильтрации полю [ЛЗС-СистСчетч].

А вот как быть в случае обращения к подчиненной форме в форме "Form1". Синтаксис мне пока не очень понятен.

@alvk · 14.03.2012, 16:16

1.Ваши имена ввергают в ступор, переделайте на адекватные.
2. Почему вы считаете, что можно вылечить по телефону? Где пациент?

@Ameli · 15.03.2012, 09:23

Обращение к полю подчиненной формы:
Forms![Название главной]![Название подчиненной].Form![Поле подчиненной]
В вашем случае условие отбора будет следующим:
[ЛЗС-код] = Forms![ОсновнаяФорма]![ФормаЗапрос2].Form![Системный счетчик]

@sashk0 · 16.03.2012, 08:54 **[ТС]**

Сообщение от alvk

1.Ваши имена ввергают в ступор, переделайте на адекватные.
2. Почему вы считаете, что можно вылечить по телефону? Где пациент?

1. Это БД рабочая, сейчас задача перенести её на портал Sharepoint, поэтому переделывать названия всех имен нет возможности.
2. Опять же БД рабочая, в ней присутствуют данные которые нельзя выносить за пределы организации.

Добавлено через 12 минут

Сообщение от Ameli

Обращение к полю подчиненной формы:
Forms![Название главной]![Название подчиненной].Form![Поле подчиненной]
В вашем случае условие отбора будет следующим:
[ЛЗС-код] = Forms![ОсновнаяФорма]![ФормаЗапрос2].Form![Системный счетчик]

В общем да, но надо немного не таким образом. Сейчас объясню на другом примере
Есть две формы: [Форма1] и [Форма2]

В [форма1] есть [ПодчиненнаяФорма1] и поле [Счетчик] в этой подчиненной форме.
В [форма2] есть [ПодчиненнаяФорма2] и поле [КодДокумента] в этой подчиненной форме.

При двойном клике мыши в поле [Счетчик] мы открываем [форма2] и задаем фильтр для поля [КодДокумента], значение фильтра должно быть равно значению [Счетчик].

По логике надо сделать следующим образом:
задать фильтр при открытии формы [форма2]
Forms![форма2]![ПодчиненнаяФорма2].Form![КодДокумента]=[значение поля Счетчик]

Т.е. левому выражению присваиваем значение правого выражения, а в вашем случае получилось немного иначе. Или я что-то не так понял?

Добавлено через 7 минут
Если я делаю по схеме:
Forms![форма2]![ПодчиненнаяФорма2].Form![КодДокумента]=[значение поля Счетчик]

То при вызове формы получаю ошибку: "Макрокоманда содержит ошибку, так как форма или отчет не связаны с таблицей или запросом".

@alvk · 16.03.2012, 09:21

Сообщение от sashk0

Опять же БД рабочая, в ней присутствуют данные которые нельзя выносить за пределы организации.

Не надо их выносить, делаете копию, оставляете в ней необходимые для решения задачи таблицы, запросы и формы. Из таблиц удаляете все данные, заносите по три фонарных записи. Сжимаете, архивируете и выкладываете на форум.
А ошибка ваша говорит о том, что у формы нет источника данных.

@Ameli · 16.03.2012, 09:55

Сообщение от sashk0

Т.е. левому выражению присваиваем значение правого выражения, а в вашем случае получилось немного иначе. Или я что-то не так понял?

Вы же не присваиваете значение, а задаете условие отбора для поля КодДокумента, поэтому:
[КодДокумента] = Forms![ОсновнаяФорма]![ФормаЗапрос2].Form![Системный счетчик]

@sashk0 · 19.03.2012, 11:49 **[ТС]**

Сообщение от Ameli

Вы же не присваиваете значение, а задаете условие отбора для поля КодДокумента, поэтому:
[КодДокумента] = Forms![ОсновнаяФорма]![ФормаЗапрос2].Form![Системный счетчик]

Тут скорее всего обратная связь будет, дело в том что мне нужно по клику во вновь открывшейся форме [форма2] задать фильтр.

Forms![форма2]![ПодчиненнаяФорма2].Form![КодДокумента]=[Счетчик]

Т.е. обратиться нужно к подчиненной форме [ПодчиненнаяФорма2] и задать там фильтр для поля [КодДокумента].

А а вашем случае получается что мы берем поле из [форма2] и задаем фильтр для [форма1], а мне надо наоборот это сделать. Берем значение из [форма1] и по этому значению задаем фильтр для [форма2]. Мы вызываем форму2, а не наоборот.

@sashk0 · 19.03.2012, 12:30 **[ТС]**

Открываем форму "ОсновнаяФорма", двойной клик на любой записи в поле [КодДокумента] записываем значеие этого поля в переменную tmpDocum и открываем форму "СправочникФорма", и применяем к ней фильтр по полю [СправКодДокумента], а значением фильтра как раз и будет значение переменной tmpDocum для поля [СправКодДокумента]. Т.е. если в основной форме выбрали запись 1560 и два раза клинули, то открылась форма в которой будет отображена запись только с номером 1560.

@alvk · 19.03.2012, 15:52

Сообщение от sashk0

Т.е. если в основной форме выбрали запись 1560 и два раза клинули, то открылась форма в которой будет отображена запись только с номером 1560.

У вас данные не совпадают, есть коды, которые есть в одной и нет в другой и наоборот, проверьте даннные. Далее, почему коды текст, а не число? Иправьте на число, когда приведёте данные в порядок, потом сделайте связь. У меня ваша БД виснет, поэтому только на словах. И почему у вас подчинённая форма, а не основная?

@sashk0 · 19.03.2012, 17:03 **[ТС]**

Сообщение от alvk

У вас данные не совпадают, есть коды, которые есть в одной и нет в другой и наоборот, проверьте даннные. Далее, почему коды текст, а не число? Иправьте на число, когда приведёте данные в порядок, потом сделайте связь. У меня ваша БД виснет, поэтому только на словах. И почему у вас подчинённая форма, а не основная?

Это веб-БД, создана в Access 2010.
Я сделал её для примера, поэтому часть записей в одной таблице может отсутствовать, это не суть важна, задача к этому никакого отношения не имеет.

По поводу связей, вы когда-нибудь создавали веб-таблицы для портала Sharepoint? Вы видимо не в курсе что в веб-таблицах нет такого понятия как связи.

@sashk0 · 19.03.2012, 17:11 **[ТС]**

Поменял поля на числовые, хотя разницы нет. Добавил сообщение для отладки при двойном клике. По сути то число которое показывает сообщение, в новой форме и должна отображаться запись только с этим числом, если такого номера в форме нет, то отобразится пустая форма, фильтр так и работает.

@alvk · 20.03.2012, 02:40

Сообщение от sashk0

Я сделал её для примера, поэтому часть записей в одной таблице может отсутствовать, это не суть важна, задача к этому никакого отношения не имеет.

Ага, мне больше заняться нечем, вот и отметил, что данные не совпадают.

@sashk0 · 20.03.2012, 06:36 **[ТС]**

Вот рабочий пример, но он работает через переменную.

@alvk · 20.03.2012, 07:29

Основную таблицу пришлось почистить, она не давала создать связь с целостностью данных, также изменен тип поля обоих кодов в обоих таблицах. Ввиду непонятной несовместимости форм 2010 и 2003 Акцесса сделал формы по-новой. Макросы выкинул на помойку, им там самое место. Вставленный код сделал автоматом мастером создания кнопки, только имя формы перебил, потому что русские знаки Акцесс кодирует. Смотрите:

@sashk0 · 20.03.2012, 08:23 **[ТС]**

Сообщение от alvk

Основную таблицу пришлось почистить, она не давала создать связь с целостностью данных, также изменен тип поля обоих кодов в обоих таблицах. Ввиду непонятной несовместимости форм 2010 и 2003 Акцесса сделал формы по-новой. Макросы выкинул на помойку, им там самое место. Вставленный код сделал автоматом мастером создания кнопки, только имя формы перебил, потому что русские знаки Акцесс кодирует. Смотрите:

Общий принцип я понял, это то что надо! Но это не работает для представления WEB, в 2010 Access есть такое понятие как веб-БД, такая БД отличается от обычно БД и имеет ряд ограничений. Поэтому работать в access 2003 с такой БД нет смысла, потому что 2003-ий не знает что такое вообще SharePoint. А данная БД создается именно для этого. После размещения веб-БД на портал, мы работаем уже на веб-странице со всеми формами, которые создавали в Access 2010.
Вот тут описано как это работает http://office.microsoft.com/ru... 56866.aspx

@alvk · 20.03.2012, 08:49

Сообщение от sashk0

Поэтому работать в access 2003 с такой БД нет смысла

А в 2010-м?
p.s. если всё правильно и всё понятно, то где же спасибо?

@sashk0 · 20.03.2012, 11:20 **[ТС]**

Сообщение от alvk

А в 2010-м?
p.s. если всё правильно и всё понятно, то где же спасибо?

Не вопрос, Спасибо! :-)

А сейчас попробуйте в access 2010 создать пустую Веб-базу и сделать всё тоже самое без использования VBA.

Первый пример который я выложил, это как раз то что и требовалось сделать на самом деле, без изобретения велосипеда. Только вопрос изначально стоял как правильно задать фильтр при открытии формы, сейчас этот фильтр работает через переменную на рабочей БД.

@alvk · 20.03.2012, 11:47

Сообщение от sashk0

сделать всё тоже самое без использования VBA.

Сообщение от sashk0

сейчас этот фильтр работает через переменную

Какое из утверждений верное?

@sashk0 · 20.03.2012, 11:56 **[ТС]**

Сообщение от alvk

Какое из утверждений верное?

Используя только те функции, которые предлагает конструктор макросов. Потому что пользовательские модули на вебе на работают.

http://office.microsoft.com/ru... c262737238
http://office.microsoft.com/ru... c262737239

@alvk · 20.03.2012, 12:00

как всё запущено.... ну тогда чего же вы хотите, раз так ограничены?

Новые блоги и статьи Все статьи Все блоги /
Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .

@sashk0 72 / 72 / 7 Регистрация: 14.03.2012 Сообщений: 201

	Условие отбора формы по полю подчиненной формы 14.03.2012, 12:22. Показов 13430. Ответов 38 Метки нет (Все метки) Доброго времени суток! Есть такая проблема, не могу разобраться: Есть основная форма "ОсновнаяФорма" в ней находится подчиненная табличная форма с названием "ФормаЗапрос2". В этой форме есть поле "Системный счетчик", для этого поля я создаю событие которое при двойном клике мышью открывает форму "Form1", в которую в свою очередь входит опять же табличная форма "ТабличнаяФормаЗапрос210ЛЗС". И вот тут надо задать фильтр для поля "ЛЗС-код" в форме "Form1". Т.е. при двойном клике мы открываем форму "Form1" в которой отображаются записи соответствующие только данным из поля "Системный счетчик" основной формы. Когда я обращался напрямую к табличной форме то я делал это так: задаем переменную "ИдСчт" для для поля [Системный счетчик]. Далее выбираем "Открыть форму", выбираем открытие формы "Form1", в условии отбора указываем [ЛЗС-СистСчетч]=[TempVars]![ИдСчт]. Т.е. тут всё очень легко, мы открываем форму и задаем ей условие фильтрации полю [ЛЗС-СистСчетч]. А вот как быть в случае обращения к подчиненной форме в форме "Form1". Синтаксис мне пока не очень понятен. 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,380
	14.03.2012, 16:16
	1.Ваши имена ввергают в ступор, переделайте на адекватные. 2. Почему вы считаете, что можно вылечить по телефону? Где пациент? 0

@Ameli 2096 / 1172 / 39 Регистрация: 05.11.2009 Сообщений: 1,605
	15.03.2012, 09:23
	Обращение к полю подчиненной формы: Forms![Название главной]![Название подчиненной].Form![Поле подчиненной] В вашем случае условие отбора будет следующим: [ЛЗС-код] = Forms![ОсновнаяФорма]![ФормаЗапрос2].Form![Системный счетчик] 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,380
	20.03.2012, 12:00
	как всё запущено.... ну тогда чего же вы хотите, раз так ограничены? 0