ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как сделать что бы поле сразу обновлялось
13 сообщений из 13, страница 1 из 1
Как сделать что бы поле сразу обновлялось
    #39791547
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
И знова Здравствуйте.

Есть как всегда база в базе есть подчинённое поле OLE в котором картинки.

Проблема: Когда выбираю другой код план-схему поле OLE не обновляется (разу)
Вопрос : Как сделать, что бы когда выбрали нужный код поле OLE сразу обновлялось, а лучше что-бы двигать стрелками "код план схемы" и поле тут же обновлялось.
База прилагается
https://cloud.mail.ru/public/toXb/ETVrLB9PV
...
Рейтинг: 0 / 0
26.03.2019, 14:40
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39791971
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Wawan2005База прилагается
https://cloud.mail.ru/public/toXb/ETVrLB9PV Может начать с таблиц и схемы?
...
Рейтинг: 0 / 0
27.03.2019, 07:06
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39791972
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
Панург,

То есть???
...
Рейтинг: 0 / 0
27.03.2019, 07:09
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792162
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПЕНСИОНЕРКА
Участник
ПанургМожет начать с таблиц и схемы?
об этом речь велась еще год назад
уж очень нестандартный подход к формированию отчетности и заполнению договоров
...
Рейтинг: 0 / 0
27.03.2019, 12:04
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792166
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
у меня картинки обновляются так
Me!ПрисоединенныйOLE1.Action = acOLEUpdate
Зы - Базу не открывал.......
...
Рейтинг: 0 / 0
27.03.2019, 12:10
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792349
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПЕНСИОНЕРКА
Участник
Wawan2005База прилагается
уж очень длинный код
путем вспомогательной переменной можно уменьшить от 2 до 10 раз
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
Private Sub Form_Open(Cancel As Integer)
Dim CNT As Control
  If IsNull(Оператор2) Then
        Me.П_Кросс2.Visible = 0
    Else
        Me.П_Кросс2.Visible = -1
    End If
 '''''''''''''''''''''''''
 Dim xgar As Boolean
   
 xgar = Nz(Me.[Тип МХЛИГ] = "гараж", 0)
 Debug.Print xgar
 ''''''''''''''''''''''''''''''''''''''''''''''''''
        Me.Н_Адрес1.Visible = Not xgar
        Me.П_Адрес1.Visible = Not xgar
        Me.Н_Собств1.Visible = Not xgar
        Me.П_Собств1.Visible = Not xgar
        Me.Н_СотТел1.Visible = Not xgar
        ''
        Me.Н_Адрес2.Visible = xgar
        Me.П_Адрес2.Visible = xgar
        Me.Н_Собств2.Visible = xgar
        Me.П_Собств2.Visible = xgar
        Me.Н_СотТел2.Visible = xgar

'        Me.П_Пути_Подъезд.Visible = Not xgar
'        Me.Данные_подч_Подъезд_ГСК.Visible = xgar

        End Sub
...
Рейтинг: 0 / 0
27.03.2019, 14:27
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792352
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПЕНСИОНЕРКА
Участник
Wawan2005,

или
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
'Действие по доверенные лица
x1 = Not Nz(Me.П_ДЛ1_ФИО = "Доверенных лиц нет." Or IsNull(П_ДЛ1_ФИО), 0)
 For Each CNT In Me.Controls
 S1 = CNT.Name
If S1 Like "[НП]_ДЛ[1-4]_№" Then CNT.Visible = x1
If S1 Like "[НП]_ДЛ[1-4]_ФИО" Then CNT.Visible = x1
If S1 Like "[НП]_ДЛ[1-4]_СТ" Then CNT.Visible = x1
If S1 Like "[НП]_ДЛ[1-4]_РТ" Then CNT.Visible = x1
If S1 Like "[НП]_ДЛ[1-4]_ДТ" Then CNT.Visible = x1
If S1 Like "[НП]_ДЛ[1-4]_Прож" Then CNT.Visible = x1
If S1 Like "[НП]_ДЛ[1-4]_М_Раб" Then CNT.Visible = x1
If S1 Like "[НП]_ДЛ[1-4]_Должн" Then CNT.Visible = x1


Next CNT
...
Рейтинг: 0 / 0
27.03.2019, 14:31
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792360
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПЕНСИОНЕРКА
Участник
ПЕНСИОНЕРКА,

ошибка в строке
Код: vbnet
1.
If S1 Like "[НП]_ДЛ[2-4]_ФИО" Then CNT.Visible = x1
...
Рейтинг: 0 / 0
27.03.2019, 14:43
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792541
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
Вы меня немножко не поняли, меня не интересует вся строчка, мне нужно моментальное обновление поля "Схема блокировки" после того как я изменяю код.
...
Рейтинг: 0 / 0
27.03.2019, 19:11
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792549
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
Serg197311,

Попробовал 3 варианта:

Код: vbnet
1.
2.
3.
4.
5.
Private Sub П_Код_Пл_Схем_BeforeUpdate(Cancel As Integer)
'    Me!Код_Пл_Схем.Action = acOLEUpdate                  '  Обновление поля кода
'    Me!Данные_подч_Схема.Action = acOLEUpdate       '  Обновление   самого поля OLE 
Me!Данные_подч2.Action = acOLEUpdate                     '  Обновление подчинённой формы
End Sub
...
Рейтинг: 0 / 0
27.03.2019, 19:22
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792551
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
ни чего не работает-(
...
Рейтинг: 0 / 0
27.03.2019, 19:22
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792560
Шаман
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Шаман
Гость
Wawan2005...когда выбрали нужный код поле OLE сразу обновлялось...Если правильно понял, то на поле со списком выбора кода, на событие после обновления:
Код: vbnet
1.
2.
3.
Private Sub П_Код_Пл_Схем_AfterUpdate()
DoCmd.Requery ""
End Sub
...
Рейтинг: 0 / 0
27.03.2019, 19:32
| Ответить | Цитировать | Написать  
Как сделать что бы поле сразу обновлялось
    #39792583
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
Шаман,

Да спасибо, заработало.
Правда я ещё один способ нашёл.
Сделал основные и подчинённые поля, где основное поле формы (П_Код_Пл_Схем) , а подчинённое поле таблицы (Код план-схемы (OLE)), тоже работает-)
И когда изменяешь она также мгновенно обновляет!
...
Рейтинг: 0 / 0
27.03.2019, 20:05
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как сделать что бы поле сразу обновлялось
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39792541&tid=1610782]:
 0ms
get settings:
 10ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 36ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 51ms
get tp. blocked users:
 1ms
others: 15ms
total:  150ms
созд. / загр.: 150ms
x
x
Закрыть


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