galka_skakalka
Дата: 28.02.2008 10:59:37
Если не трудно, пожалуйста:
В форме есть поле, значение его - ключ таблицы. Нужно, в зависимости от значения этого поля найти запись в другой таблице, такую что (ПолеФормы=ПолюТаблицы и ДатаТаблицы=date).
set tab=dbs.OpenRecordset("ИмяТабл", dbOpenTable)
Dim kluch1 as variant
DoCmd.FindRecord "tab1.Код_авто=forms![Имя_формы]![Поле]", acEntire, False, acAll, False, acAll
kluch1 = Dlookup ("Код_авто",tab1,tab1.Код_авто=forms![Имя_формы]![Поле])
на Dlookup говорит несовпадение типов, на файнд 2046 ошибка, команда недоступна..
Polev
Дата: 28.02.2008 11:04:42
DoCmd.FindRecord "tab1.Код_авто=" & forms![Имя_формы]![Поле], acEntire, False, acAll, False, acAll
kluch1 = Dlookup ("Код_авто","tab1","tab1.Код_авто=" & forms![Имя_формы]![Поле])--------------------------------------
Мне срочно надо! © sql.ru