Зависимые списки бд Заказы

@netyama · Регистрация: 15.02.2016

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

Здравствуйте, форумчане

на связи полный профан в вопросах БД MS Access.

Вопрос таков:
--есть два выпадающих списка, товары и услуги.
--Каждая услуга принадлежит к какому-либо товару.
--Как организовать так, чтобы при выбора значения из списка услуг происходил автоматический выбор определенного товара?

VBA? Средства самого Access?

@ltv_1953 · 17.05.2018, 18:33

Изучайте БД владельцы и авто, Два связанных поля со списком в ленточной форме.

@netyama · 24.05.2018, 18:50 **[ТС]**

Спасибо за помощь, благодаря Вам смогла реализовать фильтрацию в ленточной форме. Но вот какая проблема возникла, форма, в которой все непосредственно реализуется, является подчиненной. И при открытии ее в Главной форме Заказы, фильтрация не работает((( Не могли объяснить в чем зверь?

@Eugene-LS · 24.05.2018, 19:00

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

И при открытии ее в Главной форме Заказы, фильтрация не работает((( Не могли объяснить в чем зверь?

Подчинёнка обычно связывается с главой, по полям связи, по схеме данных.
При открытии "Заказы" наблюдаю:

shanemac51 · 24.05.2018, 19:02

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

@netyama · 24.05.2018, 19:04 **[ТС]**

Уже пробовала удалять и связывать заново. Итог тот же.

upd
Если открыть форму Заказ_услуг отдельно все работает.

@Eugene-LS · 24.05.2018, 19:10

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

Если открыть форму Заказ_услуг отдельно все работает.

Так каков порядок действий?
Подскажите пожалуйста, ну просто изнемогаю от желания решить вопрос.

(Ну надо же публикуемое как-то проверять на работоспособность)

@netyama · 24.05.2018, 19:19 **[ТС]**

При открытии формы Заказы вот этого окошечка не должно появляться. От него и пытаюсь избавиться... Я так понимаю, что проблема в строчке кода на открытии Код_услуги

Me.Код_услуги.RowSource = "SELECT Услуги.Код_услуги, Услуги.Наименование, Товары.Код_товара, 1 as metka FROM Товары RIGHT JOIN Услуги ON Товары.Код_товара = Услуги.Код_товара " _
& " WHERE (((Товары.Код_товара)= Forms![Заказ_услуги].[Код_товара])) " _
& " union all select top 1 '----' as 1, '----' as 2, '----' as 3, 2 as metka from Услуги " _
& " union all select Услуги.Код_услуги, Услуги.Наименование, Товары.Код_товара , 3 as metka FROM Товары RIGHT JOIN Услуги ON Товары.Код_товара = Услуги.Код_товара " _
& " order by metka"
Me.Код_услуги.Requery

Если открыть форму Заказ_услуги, то, что задумывалось работает. А если открывать форму Заказы, то это вот окошко все и портит((((

@Capi · 24.05.2018, 19:43

Visual Basic
1
2
3
4
5
6
7
8
9
10
S = "SELECT Услуги.Код_услуги, Услуги.Наименование, Товары.Код_товара, 1 as metka " & _
    "FROM Товары RIGHT JOIN Услуги ON Товары.Код_товара=Услуги.Код_товара " & _
    "WHERE Товары.Код_товара=" & Forms!Заказ_услуги.Код_товара & _
    " UNION ALL " & _
    "SELECT TOP 1 '----', '----', '----', 2 FROM Услуги " & _
    " UNION ALL " & _
    "SELECT Услуги.Код_услуги, Услуги.Наименование, Товары.Код_товара, 3 " & _
    "FROM Товары RIGHT JOIN Услуги ON Товары.Код_товара=Услуги.Код_товара " & _
    "ORDER BY metka"
Me.Код_услуги.RowSource = S

Обратите внимание на третью строку.
Еще к сведению: запросы с UNION являются необновляемыми.

@Eugene-LS · 24.05.2018, 19:46

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

Запросы с UNION являются не обновляемыми.

Это да!
netyama, как вы всё это планировали?
Так же не делается - переделывайте ....

@Eugene-LS · 24.05.2018, 19:49

netyama, и тут, по моему скромному разумению, всё не правильно

@Capi · 24.05.2018, 19:54

Eugene-LS,

Зря пробел вставили в мой текст.
В данном случае "необновляемыми" - слитно.

Проверяльщик, подчеркивающий красным, ошибается.

Пробел нужен, если бы было, "не обновляемыми, а какими-то еще..."

@netyama · 24.05.2018, 20:30 **[ТС]**

К сожалению плохо понимаю, что нужно сделать. Следовала по инструкции первого сообщения в треде по второй ссылке.

@alvk · 28.05.2018, 03:06

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

К сожалению плохо понимаю, что нужно сделать.

избавиться от union - переделать схему данных возможно, либо решать через подчинённые формы.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .

@ltv_1953 17536 / 7288 / 1663 Регистрация: 21.06.2012 Сообщений: 13,957
	17.05.2018, 18:33
	Изучайте БД владельцы и авто, Два связанных поля со списком в ленточной форме. 1

shanemac51 Модератор 12231 / 5078 / 814 Регистрация: 07.08.2010 Сообщений: 14,933 Записей в блоге: 4
	24.05.2018, 19:02
	открыла форму Заказы --ругнулась при открытии --выбрала значение в подчиненной форме --опять ругнулась запрос необновляемый 0

@netyama 0 / 0 / 0 Регистрация: 15.02.2016 Сообщений: 5
	24.05.2018, 19:04 [ТС]
	Уже пробовала удалять и связывать заново. Итог тот же. upd Если открыть форму Заказ_услуг отдельно все работает. 0

@netyama 0 / 0 / 0 Регистрация: 15.02.2016 Сообщений: 5
	24.05.2018, 19:19 [ТС]
	При открытии формы Заказы вот этого окошечка не должно появляться. От него и пытаюсь избавиться... Я так понимаю, что проблема в строчке кода на открытии Код_услуги Me.Код_услуги.RowSource = "SELECT Услуги.Код_услуги, Услуги.Наименование, Товары.Код_товара, 1 as metka FROM Товары RIGHT JOIN Услуги ON Товары.Код_товара = Услуги.Код_товара " _ & " WHERE (((Товары.Код_товара)= Forms![Заказ_услуги].[Код_товара])) " _ & " union all select top 1 '----' as 1, '----' as 2, '----' as 3, 2 as metka from Услуги " _ & " union all select Услуги.Код_услуги, Услуги.Наименование, Товары.Код_товара , 3 as metka FROM Товары RIGHT JOIN Услуги ON Товары.Код_товара = Услуги.Код_товара " _ & " order by metka" Me.Код_услуги.Requery Если открыть форму Заказ_услуги, то, что задумывалось работает. А если открывать форму Заказы, то это вот окошко все и портит(((( 0

@Eugene-LS 12066 / 5849 / 1494 Регистрация: 05.10.2016 Сообщений: 16,440
	24.05.2018, 19:49
	netyama, и тут, по моему скромному разумению, всё не правильно Миниатюры 0

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,839
	24.05.2018, 19:54
	Eugene-LS, Зря пробел вставили в мой текст. В данном случае "необновляемыми" - слитно. Проверяльщик, подчеркивающий красным, ошибается. Пробел нужен, если бы было, "не обновляемыми, а какими-то еще..." 0

@netyama 0 / 0 / 0 Регистрация: 15.02.2016 Сообщений: 5
	24.05.2018, 20:30 [ТС]
	К сожалению плохо понимаю, что нужно сделать. Следовала по инструкции первого сообщения в треде по второй ссылке. 0