Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > MS Access > извлеч данные из подзапроса

Автор: mari5 28.9.2007, 09:14

имеется форма, каторий имеет подформу, а подформа имеет еще подформу,
хочу что когда наиду данние, нажатием на тогле, чтоб значение из поля подформи передалось в поле подподформиб пишу так, но не получается:

форма ауто содержить форму гакидва

Private Sub Toggle24_Click()
Forms!auto.SetFocus
Forms!auto.ID.Requery
Forms!auto.gayidva!autokodi = Forms!auto.ID

End Sub

Автор: Akina 28.9.2007, 10:24

попробуйте не использовать цепь Forms!auto.gayidva!autokodi , разбейте ее на отдельные прямые ссылки на объекты. Что-нить типа:

Код


Dim SubForm As Form
Dim SubSubForm As Form
Set SubForm = Forms("auto")
Set SubSubForm = SubForm.gayidva
Set SubSubForm.autokodi = SubForm.ID

Автор: bopoha 28.9.2007, 23:05

Дело в том, что подчиненной формы нет в колекции Forms. auto - подчиненная, как я понял. Т.е. следующие способы не работают:

Код


Set SubForm = Forms("auto")
или
Forms!auto.ID

Если код выполняется на главной форме, то код может быть таким:

Код


With Me.auto
    gayidva.autokodi = .ID
End With

ЗЫ: Маленькое напутствие. Вместо обращений к объектам через восклицательный знак - Объект1!Объект - и по имени - Объект1("Имя") - при возможности лучше использотвать - Объект1.Объект2. Т.к. в этом случае при компиляции вы получите сообщения об ошибках, а не на этапе выполнения.