Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.03.2019, 20:01   #1
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию Ошибка обновления подчиненной формы

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

Как сделать что-бы после нажатия на "Удалить" подчиненная форма корректно обновилась?

https://youtu.be/8wMwXmOrm4Y

код кнопки
Код:
Private Sub btnDelete_Click()
    Dim ID As String
    ID = IIf(IsNull(tbIDHidden), "", tbIDHidden)
    If ID <> "" Then
        If MsgBox("Удалить запись о перевозке " & [Form_подчиненная форма qryTransportationByTransport].Destination & _
        " от " & [Form_подчиненная форма qryTransportationByTransport].Data_ & " ? ", vbQuestion + vbYesNo) = vbYes Then
        DoCmd.SetWarnings False
        DoCmd.RunSQL "DELETE * FROM tblTransportation where Код = " & ID
        DoCmd.SetWarnings True
        
        With [Form_подчиненная форма qryTransportationByTransport]
            .Filter = ""
            .FilterOn = False
             .Form.Requery
        End With
        tbIDHidden = vbNullString
        End If
    End If
End Sub
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 28.03.2019, 13:53   #2
VinniPuh
Пользователь
 
Аватар для VinniPuh
 
Регистрация: 03.02.2016
Сообщений: 49
По умолчанию

Может сначала ещё рефрешить нужно?
...
.Form.Refresh
.Form.Requery
...
VinniPuh вне форума Ответить с цитированием
Старый 31.03.2019, 01:29   #3
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Проблема изначально была мной неверно идентифицирована. Подчиненная форма отображает данные по критерию из комбобокса. Если комбобокс пустой, источник строк подчиненной формы давал сбой. Я же тестировал так: сначала добавляль новую строку в таблицу (с очисткой полей ввода) и сразу же хотел удалить строку кнопкой. Но тк комбобокс очистился то источник строк подчиненной формы валился.
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
вернуться на запись подчиненной формы CAHDEP Microsoft Office Access 0 06.07.2017 15:12
Выборка в подчиненной форме 2 из формы 2 по выбранному значению в подчиненной форме 1 из формы 1 Slava08707 Microsoft Office Access 3 22.06.2016 12:44
Перекрытие родителем подчиненной формы. Alex Cones Общие вопросы Delphi 2 08.05.2010 16:44
Обновление данных подчиненной формы из другой подчиненной формы smoky Microsoft Office Access 2 15.08.2009 15:28