Я клал это Кодего - от этого queston
http://www.experts-exchange.com/Microsoft/Development/MS_Access/Q_24858047.html?sfQueryTermInfo=1+form+pop+upНо использовано ему в дальше рядовом событии главным образом формы:
Тусклое strLinkCriteria как шнур ', котор нужно держать для того чтобы хлопнуть вверх детали цитаты в синхронизации с quoteID
Тусклое stDocName как шнур
stDocName = «sfrmQuoteCostingItem»
stLinkCriteria = «[QC_quoteID] =» & я! [txtQ_quoteID]
Если CurrentProject.AllForms (stDocName
) .IsLoaded
= ложно после этого
stDocName DoCmd.OpenForm
Закончитесь если
Формы (stDocName). Фильтр = ""
Формы (stDocName). Фильтр = stLinkCriteria
Формирует (stDocName) .FilterOn = True
До тех пор настолько хорошо а он не уверен я побегу в затруднения using шипучка вверх по форме.
Lou