|
|
|
| есть форма [все_авто]на ней две подчиненые [авто] и[события] обе в табличной форме переходя по списку в [ авто ] в [событиях ]видим подробности. соеденены подчиненые через промежуточное поле id1. есть еще одна форма [ТО] так надо чтоб при выборе машины в [ТО] по нажатию кнопки открыть форму [все_авто] с выбранным автомобилем. | |
|
| |
|
|
|
| на событие открыть формы все_авто - повесь проверку открыта ли форма ТО, если да то включить фильтр в форме авто.
If FormIsOpen_My("ТО") = True Then
str_Filte = "kod_avto = " & forms!ТО!kod_avto
Me!авто.Form.FilterOn = False
авто.Form.Filter = str_Filte
авто.Form.FilterOn = True
end if
Function FormIsOpen_My(ParamArray Ar())
FormIsOpen_My = (SysCmd(acSysCmdGetObjectState, acForm, Ar(0)) And acObjStateOpen) <> False
End Function
|
| |
|
| |
|
|
|
|
| http://hiprog.com/index.php?option=com_content&task=view&id=251661623&Itemid=35 | |
|
| |
|
|
|
| это не то, здесь все ясно | |
|
| |
|
36 Кб. |
|
| вот такой пример накидал | |
|
| |
|
21 Кб. |
|
| поубирай русские имена, форм можно замучатся.
вот чуть переделал посмотри | |
|
| |
|
|
|
|
| вообще если таблы нормально связаны (прописаны в схеме данных типа 1-ко многим), то при создании мастером формы туда суешь поля из 2-х форм и он сам спрашивает - создать подчиненные или связанные формы. и сам создает все формы и все связи. попробуй. | |
|
| |