Открытие формы с фильтром???

Юрец_1
Дата: 03.10.2005 10:27:55
Добрейшее утро, ALL!!!
Есть форма, основанная на табличной функции (проект ADP+MSSQL2000). При открытии формы с фильтром:

    fltr = "[Код_Записи] = " & rec_id & " And Код_Объекта=" & obj_id
    DoCmd.OpenForm "Форма1", , , fltr

почему то отображаются ВСЕ записи несмотря на фильтр. Почему такое происходит, всю голову уже сломал?
бух
Дата: 03.10.2005 11:37:13
ты же в эту форму "идешь" наверное из какй-то другой формы - попробуй вставить кнопку с открытием нужной формы по связаному полю
Юрец_1
Дата: 03.10.2005 13:56:06
бух
ты же в эту форму "идешь" наверное из какй-то другой формы - попробуй вставить кнопку с открытием нужной формы по связаному полю

Так у меня так и реализовано. В одной форме есть кнопка, по нажатию которой должна открываться форма "Форма1", в которой связанные поля "[Код_Записи] " и "Код_Объекта" имеют определенные значения. Но форма почему-то открывается со всеми зхаписями.... Первый раз сталкиваюсь с такой проблемой!
бух
Дата: 03.10.2005 14:51:27
в теории не силен, но думаю , не сильно ошибусь, что в обоих формах должно повторяться поле или"код записи" или код "объекта".(это "поле связи" где-то можно и на экран не выводить, чтобы его(экран) не захломлять)
adv
Дата: 03.10.2005 15:42:20
попробуйте
fltr = "[Код_Записи] = " & rec_id & " And Код_Объекта=" & obj_id
DoCmd.OpenForm "Форма1", , , fltr
Forms!Форма1.filterOn

если не поможет, давайте глянем:
fltr = "[Код_Записи] = " & rec_id & " And Код_Объекта=" & obj_id
debug.print "fltr= " & fltr
DoCmd.OpenForm "Форма1", , , fltr
debug.print "filter: " & Forms!Форма1.filter
debug.print "filterOn: " & Forms!Форма1.filterOn
adv
Дата: 03.10.2005 15:58:58
adv
попробуйте
fltr = "[Код_Записи] = " & rec_id & " And Код_Объекта=" & obj_id
DoCmd.OpenForm "Форма1", , , fltr
Forms!Форма1.filterOn = true

если не поможет, давайте глянем:
fltr = "[Код_Записи] = " & rec_id & " And Код_Объекта=" & obj_id
debug.print "fltr= " & fltr
DoCmd.OpenForm "Форма1", , , fltr
debug.print "filter: " & Forms!Форма1.filter
debug.print "filterOn: " & Forms!Форма1.filterOn