powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не смог победить признак #удалено в подчиненной форме
12 сообщений из 12, страница 1 из 1
Не смог победить признак #удалено в подчиненной форме
    #32787443
Andrey Sk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подчиненная форма основана на временной табле. На главной форме конопка ЗАПИСАТЬ нажимается юзером. Если все нормально, производится запись инфы в основные таблы, в том числе из временной. После этого основная форма очищается для нового ввода, а для очистки подчиненной из нее удаляются все записи. Все работает, но на экране в подчиненной не смог победить признак #удалено, оставшийся после удаления записей из нее. Стандартный код
Код: plaintext
Me.MySubForm.Form.RecordSource = Me.MySubForm.Form.RecordSource
не сработал. Решил проблему только через радикальное
Код: plaintext
1.
2.
3.
4.
Application.Echo False
DoCmd.Close acForm, Me.Name
DoCmd.OpenForm "MyForm"
Application.Echo True

Есть мысли у народа по этому поводу?
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32787556
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Me.MySubForm.Requery
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32787597
Andrey Sk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Vsevolod VMe.MySubForm.Requery

не проходит
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32787638
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вобщем поперебирай комбинации с Requery (можно Recalc еще попробовать)
Например, Me.Requery
Собака порылась где-то здесь, так что ищи
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32787864
GKirill
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Andrey Sk Vsevolod VMe.MySubForm.Requery

не проходитда, но тока
Код: plaintext
Me.MySubForm.Form.Requery
Если не прокатит, показывай код.
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32788345
SBL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GKirill[quot Andrey Sk] да, но тока
Код: plaintext
Me.MySubForm.Form.Requery
Если не прокатит, показывай код.

ошибку выдает Compile Error
Methor or Data Member not found

код
Private Sub Form_Click() /стрелочка указывает сюда/
Forms!jrk.Requery
.....
Me.r1.Form.Requery /.r1 - выделено/
Me.r2.Form.Requery
Me.r3.Form.Requery
Me.r4.Form.Requery
End Sub

основная форма - jrk, подчиненные - r1-r4
:-(
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32788390
SBL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
да, формы в файле.....
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32788441
Andrey Sk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GKirill
Код: plaintext
Me.MySubForm.Form.Requery
Если не прокатит, показывай код.

Не катит, это пробовал в первую очередь, ладно, ребята, я пришел к выводу, что мой код с инициализацией формы путем ее временного закрытия в невидимом для юзера режиме очень даже неплох. Форма несвязанная с источником, сабформа на временной табле, поэтому при переходе к вводу новой записи приходилось инициализировать несколько полей принудительно (в том числе списки), а так - закрыл-открыл - и усе ОК. Так что закрываю тему. Всем спасибо.
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32788445
SBL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
нее.....я бы хотел еще ответ получить :-)
рано закрыл....
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32789852
GKirill
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
SBLнее.....я бы хотел еще ответ получить :-)
рано закрыл....
Че-то я не заметил с утра вашего ответа.
Ща посмотрел.
Я так понял, что
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub Form_Click() /стрелочка указывает сюда/
Forms!jrk.Requery
.....
Me.r1.Form.Requery /.r1 - выделено/
Me.r2.Form.Requery
Me.r3.Form.Requery
Me.r4.Form.Requery
End Sub
- это код подчиненной формы.
Если да, то правильно, что выдает ошибку.
Т.к. у вас в подчиненных формах нет контролов с именами r1, r2, r3, r4.
Просто этот код надо было вставить в событие Form_Click формы jrk
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32793429
SBL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ххммм......
Method or data member not found
выделено .Form

код на форме
Private Sub Form_Click()
Me.r1.Form.Requery
Me.r2.Form.Requery
Me.r3.Form.Requery
Me.r4.Form.Requery
End Sub
...
Рейтинг: 0 / 0
Не смог победить признак #удалено в подчиненной форме
    #32793746
GKirill
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
SBLххммм......
Method or data member not found
выделено .Form

код на форме
Private Sub Form_Click()
Me.r1.Form.Requery
Me.r2.Form.Requery
Me.r3.Form.Requery
Me.r4.Form.Requery
End Sub
Этот код выполняется в форме r1, а не в форме jrk. А в форме r1 нет элемента с именем r1. Вот он и ругается.
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не смог победить признак #удалено в подчиненной форме
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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