БД владельцы и авто

@Roma302 · Регистрация: 01.05.2010

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

Делаю Базу данных Владельцы и Авто...)
И тут возник вопрос в форме создаю два поля со списком, в одном поле со списком будут МОДЕЛИ автомобилей, а во втором будут МАРКИ, этих моделей)
т.е.(например) Выбираю в ПолеСоСписком1 модель Ford, тогда в ПолеСоСписком2 будут только марки относящиеся к модели Ford, а у меня в ПолеСоСписком2 имеются ВСЕ модели кот у меня записаны в таблицы, а надо чтоб только те которые относятся к модели Ford)

@sekonya · 20.12.2011, 12:20

я понял, архивирую в rar выдает эту ошибку

@andrey_ba · 20.12.2011, 12:27

попробуйте пересохранить файл, но под другим именем и заархивировать его, может просто проблема с файлом

@sekonya · 20.12.2011, 12:27

вот выкладываю (не без помощи Ameli, за что огромное спасибо) кусок базы, на форме список "сметы" не фильтруется...

@andrey_ba · 20.12.2011, 12:53

кстати у вас сам запрос не срабатывает, сейчас попробую подправить

@sekonya · 20.12.2011, 12:55

вот я подправил

@sekonya · 20.12.2011, 13:43

кто-нибудь нашел решение?

@Ameli · 20.12.2011, 14:18

Для кого я писала это: Like IIf(IsNull([Forms]![Form1]![Область]);"*";[Forms]![Form1]![Область]) ? Если область на форме не выбрана, т.е. IsNull([Forms]![Form1]![Область]), то выбираются все записи, т.е. "*", если выбрана, то отбираются по выбранной области.
Абсолютно аналогично с заказчиком:
Like IIf(IsNull([forms]![главная]![полесосписком0]);"*";[forms]![главная]![полесосписком0])

@sekonya · 20.12.2011, 14:23

а в списке "сметы", не фильтруется! пдскажите как сделать так чтобы они отфильтровывались по полю "заказчик"? не могу разобраться...

@andrey_ba · 20.12.2011, 15:10

я же Вам писал что у вас не срабатывает сам запрос, т.е. он пустой, если в запросе убрать таблицу заказчики то все работает, посмотрите

@sekonya · 20.12.2011, 19:51

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

@alvk · 21.12.2011, 04:07

Прикольная тема, прям всё есть, что надо. Поля подстановки в таблицах, основанные на текстовых полях с полями подстановки связи. Отсутсвие основных ключей в таблицах (то, что есть ключём назвать язык не поворачивается). Вообщем весь компот на месте. Переделывать будем или подождём?

@Ameli · 21.12.2011, 08:59

Про сметы сразу не увидела. Таблица Заказчики связана с таблицей Объекты через таблицу Договора, ее то и не хватало в запросе источнике списка Сметы. Кроме того исправила сравнение по объекту (вместо поля14 - список4 - список объектов)

@sekonya · 22.12.2011, 09:03

я извиняюсь, но у меня снова вопрос:
допустим, в поле со списком "заказчик" выбран заказчик, после этого выбран договор в списке "договор", отбор везде произошел, но как только я меняю заказчика на другого, списки становятся пустыми... я так полагаю что это происходит от того что я кликнул по определенной записи в списке и она осталась выделенной, как на событие после обновления поля со списком "заказчик" снять выделение со всех списков?(!)

Добавлено через 19 часов 32 минуты
решил вопрос с выделением, выделение снято, но списки все равно пустые!!! что делать? помогите!!

Добавлено через 35 минут
все таки выделение не снимается! подскажите процедуру снятия выделения в списке, я делаю так:

Visual Basic

Dim varITm As Variant
For Each varITm In Me!Ñïèñîê2.ItemsSelected
 Me!Ñïèñîê2.Selected(varITm) = False
Next varITm
Me!Ñïèñîê2.Requery

@V_Monomax · 22.12.2011, 09:15

попробуйте насадить на действие по нажатию на поле заказчик следующее:

Visual Basic

1	Form_[ваша форма].Refresh

@sekonya · 22.12.2011, 09:31

так не получается...

@Menred · 20.02.2012, 10:45

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

Для списков абсолютно аналогично. В приложении см. пример: на форме есть два списка Область и Город, в источнике строк поля Город задано условие отбора для поля Область:
Like IIf(IsNull([Forms]![Form1]![Область]);"*";[Forms]![Form1]![Область])
- если Область на форме еще не выбрана, то отображаются все города, если выбрано, то отбираются города в этой области.
После обновления списка Область, а также по событию Текущая запись формы обновляется список городов:

Visual Basic

1	Список4.Requery

Условие должно работать применимо в форме к полям со списком с несколькими записями?
В этом примере не вижу связи Города с областью. Получается в поле город предоставляется выбор области...
У меня код делает не то что надо. В чем ошибка?

@Ameli · 20.02.2012, 10:57

После выбора области, список городов отфильтровывается по выбранной области.
Отбор происходит следующим образом: в подстановке поля со списком Город есть Область, которую мы фильтруем по выбранной Области на форме (Like IIf(IsNull([Forms]![Form1]![Область]);"*";[Forms]![Form1]![Область]), кроме того по событию После обновления Области обновляем Город

Visual Basic

1	Список4.Requery

. Работает как для полей со списком, так и для списков в одиночной форме

@andrey_ba · 20.02.2012, 10:58

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

У меня код делает не то что надо. В чем ошибка?

вы бы хотябы свою базу показали б,

Не по теме:

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

@Menred · 20.02.2012, 11:04

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

Источником поля "Марки" делаешь запрос, в который добавляешь поле "КодМодели" из таблицы модели (естественно таблицы марки и модели должны быть связаны), для него ставишь условие отбора = Forms![Твоя форма]![Модель]
На событие "после обновления" для поля "Модель" ставишь [Марка].Requery - обновить поле марка.
Внимание! Данный способ действует только для одиночной формы (на экране видно одну запись).
Обычно ленточные и табличные формы предназначены для поиска и просмотра, для ввода и редактирования - одиночная форма, поэтому в ней как раз и нужна фильтрация списков.

Качаю пример, там в поле марки не зависимо от модели появляется весь список марок. Как я понимаю должны появлятся только марки соответсвтвующие модели? что не так?

@Ameli · 20.02.2012, 11:21

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

что не так?

Возможно не включен код VBA и макросы.
Если 2007 аксесс, то при запуске у вас вверху появляется сообщение, предупреждающее о содержащемся в бд коде VBA, надо нажать кнопку "Включить содержимое". В параметрах можно задать надежные расположения, чтобы каждый раз не выскакивало это сообщение.
Если 2003, то Сервис - Макрос - Безопасность - поставьте низкую.

@sekonya 608 / 387 / 8 Регистрация: 14.04.2011 Сообщений: 1,324
	20.12.2011, 13:43	26
	кто-нибудь нашел решение? 0

@sekonya 608 / 387 / 8 Регистрация: 14.04.2011 Сообщений: 1,324
	20.12.2011, 14:23	28
	а в списке "сметы", не фильтруется! пдскажите как сделать так чтобы они отфильтровывались по полю "заказчик"? не могу разобраться... 0

@andrey_ba 267 / 267 / 4 Регистрация: 01.11.2011 Сообщений: 612
	20.02.2012, 10:58	38
	Сообщение от Menred У меня код делает не то что надо. В чем ошибка? вы бы хотябы свою базу показали б, Не по теме: а то гадалки нынче дорого за свои услуги просят 0

@Menred 11 / 8 / 0 Регистрация: 17.02.2012 Сообщений: 88
	20.02.2012, 11:04	39
	Сообщение от Ameli Источником поля "Марки" делаешь запрос, в который добавляешь поле "КодМодели" из таблицы модели (естественно таблицы марки и модели должны быть связаны), для него ставишь условие отбора = Forms![Твоя форма]![Модель] На событие "после обновления" для поля "Модель" ставишь [Марка].Requery - обновить поле марка. Внимание! Данный способ действует только для одиночной формы (на экране видно одну запись). Обычно ленточные и табличные формы предназначены для поиска и просмотра, для ввода и редактирования - одиночная форма, поэтому в ней как раз и нужна фильтрация списков. Качаю пример, там в поле марки не зависимо от модели появляется весь список марок. Как я понимаю должны появлятся только марки соответсвтвующие модели? что не так? 0

@Ameli 2095 / 1171 / 39 Регистрация: 05.11.2009 Сообщений: 1,605
	20.02.2012, 11:21	40
	Сообщение от Menred что не так? Возможно не включен код VBA и макросы. Если 2007 аксесс, то при запуске у вас вверху появляется сообщение, предупреждающее о содержащемся в бд коде VBA, надо нажать кнопку "Включить содержимое". В параметрах можно задать надежные расположения, чтобы каждый раз не выскакивало это сообщение. Если 2003, то Сервис - Макрос - Безопасность - поставьте низкую. 0

@Roma302 4 / 4 / 0 Регистрация: 01.05.2010 Сообщений: 54
		1
	БД владельцы и авто 06.05.2010, 16:08. Показов 57274. Ответов 102 Метки нет (Все метки) Делаю Базу данных Владельцы и Авто...) И тут возник вопрос в форме создаю два поля со списком, в одном поле со списком будут МОДЕЛИ автомобилей, а во втором будут МАРКИ, этих моделей) т.е.(например) Выбираю в ПолеСоСписком1 модель Ford, тогда в ПолеСоСписком2 будут только марки относящиеся к модели Ford, а у меня в ПолеСоСписком2 имеются ВСЕ модели кот у меня записаны в таблицы, а надо чтоб только те которые относятся к модели Ford) 1

@sekonya 608 / 387 / 8 Регистрация: 14.04.2011 Сообщений: 1,324
	20.12.2011, 12:20	21
	я понял, архивирую в rar выдает эту ошибку 0

@andrey_ba 267 / 267 / 4 Регистрация: 01.11.2011 Сообщений: 612
	20.12.2011, 12:27	22
	попробуйте пересохранить файл, но под другим именем и заархивировать его, может просто проблема с файлом 1

@andrey_ba 267 / 267 / 4 Регистрация: 01.11.2011 Сообщений: 612
	20.12.2011, 12:53	24
	кстати у вас сам запрос не срабатывает, сейчас попробую подправить 0

@sekonya 608 / 387 / 8 Регистрация: 14.04.2011 Сообщений: 1,324
	20.12.2011, 19:51	30
	так то оно так, да только при выборе заказчика в списке "сметы" ни чего не происходит, а хотелось чтобы уже после обновления поля со списком "заказчик" в списке "сметы" оставались только те записи которые относятся к данному заказчику(!), а у меня после обновления список "сметы" пустой*** 0

@alvk 7442 / 4576 / 301 Регистрация: 12.08.2011 Сообщений: 14,243
	21.12.2011, 04:07	31
	Прикольная тема, прям всё есть, что надо. Поля подстановки в таблицах, основанные на текстовых полях с полями подстановки связи. Отсутсвие основных ключей в таблицах (то, что есть ключём назвать язык не поворачивается). Вообщем весь компот на месте. Переделывать будем или подождём? 0

@sekonya 608 / 387 / 8 Регистрация: 14.04.2011 Сообщений: 1,324
	22.12.2011, 09:31	35
	так не получается... 0

БД владельцы и авто

Решение