Использование даных формы в запросе

Tatsiy

Нужна свежая идея. Есть форма (frmControlModuleTransfer) в которой из списка (stControlModuleTag) выбирается нужное значение по которому происходит выборка. Вот примерно так выгдядит запрос:SELECT * FROM *********************** WHERE (((***********************.SourceTag)=FORMS!frmControlModuleTransfer.lstControlModuleTag.Value));Все работает, но если запрос вызывается функцией, то все летит к чертям. Попробовал вместо переменной из формы поставить статическое значеие - все работает.Какие будут предложения?
2 ответа

Tatsiy

Нужна свежая идея. Есть форма (frmControlModuleTransfer) в которой из списка (stControlModuleTag) выбирается нужное значение по которому происходит выборка. Вот примерно так выгдядит запрос:SELECT * FROM *********************** WHERE (((***********************.SourceTag)=FORMS!frmControlModuleTransfer.lstControlModuleTag.Value));Все работает, но если запрос вызывается функцией, то все летит к чертям. Попробовал вместо переменной из формы поставить статическое значеие - все работает.Какие будут предложения?
В коде модуля:
Public function iModuleTag() as long
 iModuleTag = Forms.("frmControlModuleTransfer").Controls("lstControlModuleTag").Value
end public
В запросе:
SELECT * FROM *********************** WHERE SourceTag=iModuleTag()


Tatsiy

В коде модуля:В запросе:
Public Function TransferModuleTag() As String TransferModuleTag = Forms!frmControlModuleTransfer.lstControlModuleTag.ValueEnd FunctionСпасибо. С небольшими изменениями код пошел.Public Function TransferModuleTag() As String TransferModuleTag = Forms!frmControlModuleTransfer.lstControlModuleTag.ValueEnd FunctionИнтересно, есть ли еще какие-нибудь предлжения?