Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

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

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


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 15 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

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

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

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

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
__________________
Mailto: media.project@ukr.net
Aleksandr H. на форуме   Ответить с цитированием
Старый 28.03.2019, 14:53   #2
VinniPuh
Пользователь
 
Аватар для VinniPuh
 
Регистрация: 03.02.2016
Сообщений: 49
Репутация: 10
По умолчанию

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

Проблема изначально была мной неверно идентифицирована. Подчиненная форма отображает данные по критерию из комбобокса. Если комбобокс пустой, источник строк подчиненной формы давал сбой. Я же тестировал так: сначала добавляль новую строку в таблицу (с очисткой полей ввода) и сразу же хотел удалить строку кнопкой. Но тк комбобокс очистился то источник строк подчиненной формы валился.
__________________
Mailto: media.project@ukr.net
Aleksandr H. на форуме   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

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


17:31.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.

Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru