Подстановка значения поля при выборе значения другого поля

@rudaki29rus · Регистрация: 15.05.2014

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

Добрый день. Есть таблица Блюда и таблица Меню. В Меню есть поле наименование, в свойствах которого в поле источник данных стоит таблица Блюда. Необходимо что бы при выборе блюда из выпадающего списка автоматом подставлялась его цена. Дела таким образом, как нашел на форуме - в пункт "после обновления" поля наименование вставил такую строку - [Цена].Value=DLookUP("[Цена]","[Блюда]","[Наименование]="" & [Наименование] & ""), но что-то она не срабатывает... в чем моя ошибка? Спасибо. Если не трудно, опишите по-шагово (в acesse полный ноль). Accsess 2007.

@ltv_1953 · 10.03.2015, 11:56

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

опишите по-шагово

Описать что? Как создается поле со списком? Это в хелпе.
Схема: в поле со списком "наименование" добавляете в источник строк - запрос еще один столбец с ценой, в свойствах указываете общее количество столбцов (2 или 3, как у Вас будет - непонятно, код блюда Вы вводите в меню или наименование?) и их ширину (для всех, обычно для цены - 0). А в событии "после обновления" пишите

Visual Basic

1	Me.Цена=Me.Наименование.Column(2)

или 1 - номер столбца с ценой-1.

@rudaki29rus · 10.03.2015, 13:05 **[ТС]**

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

Описать что? Как создается поле со списком? Это в хелпе.
Схема: в поле со списком "наименование" добавляете в источник строк - запрос еще один столбец с ценой, в свойствах указываете общее количество столбцов (2 или 3, как у Вас будет - непонятно, код блюда Вы вводите в меню или наименование?) и их ширину (для всех, обычно для цены - 0). А в событии "после обновления" пишите

В поле со списком "наименование" в источнике строк у меня стоит "Блюда", как там добавить столбец с ценой?

@ltv_1953 · 10.03.2015, 13:15

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

DLookUP("[Цена]","[Блюда]"

а разве его там нет? Что же тогда DLookUp ищет?
Продолжим "угадайку": если в таблице Блюда три первых поля код, наименование и цена, то в свойствах поля со списком (вкладка макет) нужно указать, что число столбцов 3, ширина столбцов 0; 3; 0 (3 - для примера, должна стоять ширина достаточная для наименования).

@rudaki29rus · 10.03.2015, 14:04 **[ТС]**

Вот как сейчас выглядит:

Подстановка значения поля при выборе значения другого поля

@rudaki29rus · 10.03.2015, 14:20 **[ТС]**

Что еще куда поставить что бы заработало? Спасибо.

@ltv_1953 · 10.03.2015, 14:25

А как узнать структуру таблицы Блюда? Угадать?
Это так трудно, прочитать Правила раздела и выложить базу, как там написано ... . Неужели лучше потратить два часа "переливая из пустого в порожнее"?

@rudaki29rus · 10.03.2015, 14:38 **[ТС]**

Понял, туплю. - База данных1.rar

@ltv_1953 · 10.03.2015, 14:49

Не был указан тип источника строк. Все в процедурах "после обновления". И сделайте поля в таблицах обязательными. А то будут блюда без цены, а меню без количества. Кстати, почему меню? По смыслу это заказы или продажи ... .

@rudaki29rus · 10.03.2015, 15:04 **[ТС]**

Спасибо, но чет у меня все равно не подставляет... И как сделать так, что бы при удалении записей из Меню они автоматом удалялись бы и из "подчиненная форма Меню"? Да, это больше заказ, переименую)

@ltv_1953 · 10.03.2015, 15:17

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

Спасибо, но чет у меня все равно не подставляет...

Это где? В той базе, которую я Вам выложил в форме подчиненная форма Меню цену подставляет и сумму считает, после ввода количества. Если в другой, то нужно не только указать источник строк, но и процедуры обработки событий скопировать (код VBA).

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

И как сделать так, что бы при удалении записей из Меню они автоматом удалялись бы и из "подчиненная форма Меню"?

А что, если удалять из таблицы записи из формы не удаляются? Не верю ... . Опять таки, у меня все удаляется, сообщение #Удалено в записи появляется ... .

@rudaki29rus · 10.03.2015, 15:54 **[ТС]**

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

Это где? В той базе, которую я Вам выложил в форме подчиненная форма Меню цену подставляет и сумму считает, после ввода количества. Если в другой, то нужно не только указать источник строк, но и процедуры обработки событий скопировать (код VBA).

Да, в форме подчиненная форма Меню - цена не подставляется, сумма не считается...

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

А что, если удалять из таблицы записи из формы не удаляются? Не верю ... . Опять таки, у меня все удаляется, сообщение #Удалено в записи появляется ... .

Да, #Удалено появляется, а можно ли сделать так что б и строка удалялась?

@ltv_1953 · 10.03.2015, 16:04

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

Да, в форме подчиненная форма Меню - цена не подставляется, сумма не считается...

Код	Наименование	Количество	Цена	Сумма
3	Мясная нарезка	3,00	300	900
4	Сырная нарезка	4,00	250	1000
5	Мясная нарезка	5,00	300	1500
6	Овощная нарезка	6,00	200	1200
7	Мясная нарезка	6,00	300	1800
8	Сырная нарезка	1,00	250	250
9	Мясная нарезка	2,00	300	600
10	Овощная нарезка		200

Мне это что, привиделось?

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

Да, #Удалено появляется, а можно ли сделать так что б и строка удалялась?

Работать с данным (и удалять) нужно только в формах, в таблицы "лазить" не нужно". А "удаленная строка" пропадет, если обновить записи формы (отсортировать, например).

@rudaki29rus · 10.03.2015, 16:06 **[ТС]**

Все, извиняюсь, подстановка работает - на другой машине проверил... у меня видимо access глючит...

@ltv_1953 · 10.03.2015, 16:26

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

у меня видимо access глючит...

Скорей всего не глючит, а в центре управления безопасностью (параметры Access) отключены макросы и т.п..

@pomi · 21.05.2015, 13:00

Добрый день!
Помогите пожалуйста решить задачу. Есть база данных. В ней три таблицы и одна форма. В форму выбраны поля для редактирования из этих трех таблиц. В таком виде как есть данные из этих таблиц подставляются нормально. Но, для удобства пользования нужно сделать поле со списком для поля "особ_рах". Что-бы при выборе данных в этом поле в остальные поля подставлялись данные в остальные поля которые берутся из других таблиц.
Полистал кучу веток на форуме но не могу разобраться как правильно сделать брал несколько примеров и ничего не выходит. Нашел эту тему близкую по проблеме.
Базу прикрепляю.
Зарание благодарю.

@alvk · 22.05.2015, 07:13

Почему я в этой теме не могу нажать кнопку "Лучший ответ"??

@pomi · 22.05.2015, 08:33

Фамилия вроде сделал что-бы подставлялась. Сделал так:
в поле со списком "особ_рах", в свойсвах - источник строк, прописал так:

SQL

1
2
3

SELECT SPISG.особ_рах, GZAM.ПІБ, GZAM.[Адреса проживання]
 FROM GZAM INNER JOIN SPISG
 ON GZAM.особ_рах=SPISG.особ_рах;

а в поле формы "ПИБ" - свойства - данные написал: =[Формы]![Форма для договору]![особ_рах].[Column](1)

но когда пробую писать в поле формы "Адрес проживания" - свойства - данные: =[Формы]![Форма для договору]![особ_рах].[Column](2)

адрес не подставляется.

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

shanemac51 · 22.05.2015, 09:18

Весьма сомневаюсь в схеме таблиц

для начала
СДЕЛАЛА ПОПЫТКУ ПЕРЕВЕСТИ ИМЕНА

	D:\RAB\2015-05\Копия договара.mdb	22 мая 2015 г.

	Таблица: GZAM			Таблица: GZAM


	Код	Длинное целое	4	код
	Адреса проживання	Т`	255	адрес проживания
	ПІБ	Т`	255	ФИО
	ном_л_чил	Т`	255	ном л чил
К	особ_рах	Т`	255	особ сч
	пов_рка	Т`	255	пов_рка
	тип	Т`	255	тип
	дат_дог	Т`	255	дат_дог
	показник	Т`	255	показатель
	потуж	Т`	255	мощных
	м_сце встановлення автомату	Т`	255	м_сце установления автомата
	тип автомату	Т`	255	тип автомата
	напруга	Т`	255	напряжение
	струм	Т`	255	ток
	фазн_сть	Т`	255	фазн_сть
	показники	Т`	255	показатели
	м_сце встановлення л_ч	Т`	255	м_сце установления л_ч
	межа розподілу	Т`	255	предел распределения

	Таблица: SPISG			Таблица: SPISG


	Код	Длинное целое	4	код
	Адреса	Т`	255	Адрес
	ПИБ	Т`	255	ПИБ
К	особ_рах	Т`	255	особ сч
	паспорт	Т`	255	паспорт
	код_ИНН	Т`	255	код_ИНН
	дата	Дата/время	8	дата
	телефон	Т`	255	телефон

	Таблица: прописка			Таблица: прописка


	Код	Длинное целое	4	код
	Адреса	Т`	255	Адрес
	ПИБ	Т`	255	ПИБ
К	особ_рах	Т`	255	особ сч
	паспорт	Т`	255	паспорт
	код_ИНН	Т`	255	код_ИНН

@pomi · 22.05.2015, 09:24

А зачем их переводить? символкоторые могут быть нечитабельными заменены на нижнее почеркование.
А что не так со связями. Связал их по ключеовому полю. оно 100% уникально и вся информация должна соответствовать этому полю

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
		1
	Подстановка значения поля при выборе значения другого поля 10.03.2015, 11:45. Показов 28046. Ответов 22 Метки нет (Все метки) Добрый день. Есть таблица Блюда и таблица Меню. В Меню есть поле наименование, в свойствах которого в поле источник данных стоит таблица Блюда. Необходимо что бы при выборе блюда из выпадающего списка автоматом подставлялась его цена. Дела таким образом, как нашел на форуме - в пункт "после обновления" поля наименование вставил такую строку - [Цена].Value=DLookUP("[Цена]","[Блюда]","[Наименование]="" & [Наименование] & ""), но что-то она не срабатывает... в чем моя ошибка? Спасибо. Если не трудно, опишите по-шагово (в acesse полный ноль). Accsess 2007. 0

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
	10.03.2015, 13:05 [ТС]	3
	Сообщение от ltv_1953 Описать что? Как создается поле со списком? Это в хелпе. Схема: в поле со списком "наименование" добавляете в источник строк - запрос еще один столбец с ценой, в свойствах указываете общее количество столбцов (2 или 3, как у Вас будет - непонятно, код блюда Вы вводите в меню или наименование?) и их ширину (для всех, обычно для цены - 0). А в событии "после обновления" пишите В поле со списком "наименование" в источнике строк у меня стоит "Блюда", как там добавить столбец с ценой? 0

@ltv_1953 17486 / 7248 / 1651 Регистрация: 21.06.2012 Сообщений: 13,864
	10.03.2015, 13:15	4
	Сообщение от rudaki29rus DLookUP("[Цена]","[Блюда]" а разве его там нет? Что же тогда DLookUp ищет? Продолжим "угадайку": если в таблице Блюда три первых поля код, наименование и цена, то в свойствах поля со списком (вкладка макет) нужно указать, что число столбцов 3, ширина столбцов 0; 3; 0 (3 - для примера, должна стоять ширина достаточная для наименования). 0

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
	10.03.2015, 14:04 [ТС]	5
	Вот как сейчас выглядит: 0

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
	10.03.2015, 14:20 [ТС]	6
	Что еще куда поставить что бы заработало? Спасибо. 0

@ltv_1953 17486 / 7248 / 1651 Регистрация: 21.06.2012 Сообщений: 13,864
	10.03.2015, 14:25	7
	А как узнать структуру таблицы Блюда? Угадать? Это так трудно, прочитать Правила раздела и выложить базу, как там написано ... . Неужели лучше потратить два часа "переливая из пустого в порожнее"? 1

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
	10.03.2015, 14:38 [ТС]	8
	Понял, туплю. - База данных1.rar 0

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
	10.03.2015, 15:04 [ТС]	10
	Спасибо, но чет у меня все равно не подставляет... И как сделать так, что бы при удалении записей из Меню они автоматом удалялись бы и из "подчиненная форма Меню"? Да, это больше заказ, переименую) 0

@ltv_1953 17486 / 7248 / 1651 Регистрация: 21.06.2012 Сообщений: 13,864
	10.03.2015, 15:17	11
	Сообщение от rudaki29rus Спасибо, но чет у меня все равно не подставляет... Это где? В той базе, которую я Вам выложил в форме подчиненная форма Меню цену подставляет и сумму считает, после ввода количества. Если в другой, то нужно не только указать источник строк, но и процедуры обработки событий скопировать (код VBA). Сообщение от rudaki29rus И как сделать так, что бы при удалении записей из Меню они автоматом удалялись бы и из "подчиненная форма Меню"? А что, если удалять из таблицы записи из формы не удаляются? Не верю ... . Опять таки, у меня все удаляется, сообщение #Удалено в записи появляется ... . 0

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
	10.03.2015, 15:54 [ТС]	12
	Сообщение от ltv_1953 Это где? В той базе, которую я Вам выложил в форме подчиненная форма Меню цену подставляет и сумму считает, после ввода количества. Если в другой, то нужно не только указать источник строк, но и процедуры обработки событий скопировать (код VBA). Да, в форме подчиненная форма Меню - цена не подставляется, сумма не считается... Сообщение от ltv_1953 А что, если удалять из таблицы записи из формы не удаляются? Не верю ... . Опять таки, у меня все удаляется, сообщение #Удалено в записи появляется ... . Да, #Удалено появляется, а можно ли сделать так что б и строка удалялась? 0

@rudaki29rus 0 / 0 / 0 Регистрация: 15.05.2014 Сообщений: 27
	10.03.2015, 16:06 [ТС]	14
	Все, извиняюсь, подстановка работает - на другой машине проверил... у меня видимо access глючит... 0

@ltv_1953 17486 / 7248 / 1651 Регистрация: 21.06.2012 Сообщений: 13,864
	10.03.2015, 16:26	15
	Сообщение от rudaki29rus у меня видимо access глючит... Скорей всего не глючит, а в центре управления безопасностью (параметры Access) отключены макросы и т.п.. 0

@alvk 7397 / 4534 / 295 Регистрация: 12.08.2011 Сообщений: 14,021
	22.05.2015, 07:13	17
	Почему я в этой теме не могу нажать кнопку "Лучший ответ"?? 0

@pomi 0 / 0 / 0 Регистрация: 04.04.2011 Сообщений: 9
	22.05.2015, 09:24	20
	А зачем их переводить? символкоторые могут быть нечитабельными заменены на нижнее почеркование. А что не так со связями. Связал их по ключеовому полю. оно 100% уникально и вся информация должна соответствовать этому полю 0