Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Выполнение условия при использовании подчинённых полей. / 16 сообщений из 16, страница 1 из 1
28.03.2019, 14:15
    #39792942
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Здравствуйте.

Есть 2 таблицы, в одной таблице есть поля "Тип МИЛИГ","Улица","Дом","ГСК_Улица","ГСК_Дом","ГСК_Бокс", в другой таблице поля "Улица","Дом","Pictures"

Так вот необходимо чтобы по адресу одной таблицы выбиралась картинка в другой таблице соответствующая адресу, но есть мааааленькое "НО"
то есть если в "Тип МИЛИГ" значение "квартира" или "домовладение" то всё нормально можно сделать простым управлением подчинённых и основных полей,
но если "Тип МИЛИГ" значение "гараж", то адрес нужен ГСК_*, причём "Улица","Дом" всё равно используется как место проживания собственника ГСК.

Вопрос: как сделать чтобы при значении "гараж" в поле "Тип МИЛИГ" подчинённость переходила на ГСК_* ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.03.2019, 14:33
    #39792965
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Посмотрите использование функции iif(...;...;...)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.03.2019, 14:51
    #39792983
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Joss,

не прокатывает, аксесс ахеревает от такой наглости и выдаёт отказ в виде ошибки-)
P.S.: я его вбивал в свойствах поля в строку подчинённое поле.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.03.2019, 15:24
    #39793019
Кривцов Анатолий
Кривцов Анатолий
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Wawan2005, где это должно происходить? В форме/отчете/запросе?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.03.2019, 15:34
    #39793027
__Michelle
__Michelle
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Wawan2005я его вбивал в свойствах поля в строку подчинённое поле.

Свой синтаксис изобретаете?

Программно нужно менять LinkChildFields, LinkMasterFields.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.03.2019, 18:41
    #39793256
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
__Michelle,

Вот попробовал но не работает
Подч_Данные2_Подезд- подчинённая форма

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
  Dim gsk As String
    gsk = ГСК_Дом & "-" & ГСК_Бокс
   If Me.П_ВидОбъкта = "гараж" Then
        Me.Form.LinkMasterFields = "ГСК_Улица;gsk"
        Me.Подч_Данные2_Подезд_Рис.LinkChildFields = "Улица;Дом"
   Else
        Me.Form.LinkMasterFields = "Улица;Дом"
        Me.Подч_Данные2_Подезд_Рис.LinkChildFields = "Улица;Дом"
   End If



ругается на эту строчку (пока)
Код: vbnet
1.
        Me.Подч_Данные2_Подезд_Рис.LinkChildFields = "Улица;Дом"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.03.2019, 20:50
    #39793328
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
__Michelle,

Поправка
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
  Dim gsk As String
    gsk = ГСК_Дом & "-" & ГСК_Бокс
   If Me.П_ВидОбъкта = "гараж" Then
  '      Me.Form.LinkMasterFields = "ГСК_Улица;gsk"
  '      Me.[Подч_Данные2_Подезд_Рис].LinkChildFields = "Улица;Дом"
   Else
        Me.Form.LinkMasterFields = "Улица;Дом"              'теперь на эту строку ругается
        Me.[Подч_Данные2_Подезд_Рис].LinkChildFields = "Улица;Дом"
   End If


теперь ругается на
Код: vbnet
1.
Me.Form.LinkMasterFields = "Улица;Дом"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 02:51
    #39793377
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Изменение структуры (связей) в БД считаю не ICE
Почему не сделать как-то так:
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 03:52
    #39793378
Панург
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
sdkuИзменение структуры (связей) в БД считаю не ICEА кто-то меняет связи?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 07:26
    #39793387
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
sdku,

не вариант
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 07:35
    #39793392
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Решил проблему так:
создал поле "П_gsk1", (ибо эта зараза кроме как поля ничего не понимает)

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
  П_gsk1 = [ГСК_Дом] & "-" & [ГСК_Бокс]
 ' gsk1 = [ГСК_Дом] & "-" & [ГСК_Бокс]
 If Me.П_ВидОбъкта = "гараж" Then
        Me.[Пути подъезда].LinkMasterFields = "ГСК_Улица;П_gsk1"
 '        Me.[Пути подъезда].LinkMasterFields = "ГСК_Улица;gsk1"
       Me.[Пути подъезда].LinkChildFields = "Улица;Дом"
   Else
        Me.[Пути подъезда].LinkMasterFields = "Улица;Дом"
        Me.[Пути подъезда].LinkChildFields = "Улица;Дом"
   End If



и получилось во так, потому как [Подч_Данные2_Подезд_Рис]-подформа, а надо было указать поле [Пути подъезда],
ввиду того что "эта зараза кроме как поля ничего не понимает", или точнее сказать, я, не знаю как ей объяснить,
чтобы она вставляла сразу переменную "gsk1" без создания лишнего поля.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 08:15
    #39793400
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
__Michelle,

Спасибо, за правильно указанное направление!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 10:50
    #39793456
Кривцов Анатолий
Кривцов Анатолий
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Со стороны главной формы в связи могут участвовать свободные и вычисляемые поля.
Предлагаю такой вариант:
Создаете скрытые поля "УлицаСвязь" и "ДомСвязь".
В св-ве "Данные у "УлицаСвязь" пишете =IIF([П_ВидОбъкта] = "гараж";[ГСК_Улица];[Улица])
В св-ве "Данные у "ДомСвязь" пишете =IIF([П_ВидОбъкта] = "гараж";[ГСК_Дом] & "-" & [ГСК_Бокс];[Дом])

В св-во LinkMasterFields вручную пишете "УлицаСвязь;ДомСвязь".

Все! Никакого кода не надо.

Или, при желании, сделать эти поля свободными и в коде присваивать им требуемые значения.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 12:42
    #39793530
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Кривцов Анатолий,

Спасибо, я так пробовал, работает, просто при таком раскладе надо 2 поля, а при имеющемся 1 поле (и то только дя соединения 2-х полей), а так разницы ни какой.
Я спрашивал, есть-ли способ вообще обойтись без полей(при вычислении)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 14:10
    #39793591
Кривцов Анатолий
Кривцов Анатолий
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Wawan2005Я спрашивал, есть-ли способ вообще обойтись без полей(при вычислении) Если я правильно понял вопрос, то можно форму с субформой никак не связывать, а в нужный момент менять запрос-источник субформы, подставляя требуемые условия отбора.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2019, 16:56
    #39793769
Wawan2005
Wawan2005
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выполнение условия при использовании подчинённых полей.
Кривцов Анатолий,

В ТОЧКУ, по средствам VBA не делая лишних полей.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Выполнение условия при использовании подчинённых полей. / 16 сообщений из 16, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 446ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1610778]:
 0ms
get settings:
 11ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 26ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 49ms
get tp. blocked users:
 2ms
others: 322ms
total:  446ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]