Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / RecordSourse для SubForm'ы / 4 сообщений из 4, страница 1 из 1
08.01.2003, 15:39
    #32087565
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RecordSourse для SubForm'ы
есть такой код:
Код: plaintext
1.
2.
3.
CurrentDb.QueryDefs.Delete  "SumLen" 
CurrentDb.CreateQueryDef  "SumLen" ,  "SELECT ..." 
Me.TempSumLen.Visible = True
Me.TempSumLen.Form.Requery

одно время его модификация работала, а теперь не работает на последней строчки с крками:
Run-time error '2467'
The expression you entered refers to an object that is closed or doesn't exist
вылетает на хрен причём запрос прекрасно просматривается, там всё что надо есть.
Он что не успевает сообразить, запрос ему вернули???
Данный код выполняется, как при загрузки формы так и пойзже, вернее не хочет выполняться:-(

PS
установлено в ручную:
Код: plaintext
Me.TempSumLen.Form.RecordSource =  "SumLen" 

(AccESS'97)
...
Рейтинг: 0 / 0
08.01.2003, 15:53
    #32087593
Glass
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RecordSourse для SubForm'ы
а попробуйте строчку
Me.TempSumLen.Form.RecordSource = "SumLen"

поставить перед
Me.TempSumLen.Visible = True
Me.TempSumLen.Form.Requery
...
Рейтинг: 0 / 0
08.01.2003, 16:02
    #32087605
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RecordSourse для SubForm'ы
Попробывал - на ней и стало вылетать
Пишет тоже самое :(
...
Рейтинг: 0 / 0
08.01.2003, 16:57
    #32087683
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RecordSourse для SubForm'ы
Во прикол:
убрал
Код: plaintext
CurrentDb.QueryDefs.Delete  "SumLen" 
на закрытие формы и всё пошло... в чём прикол???
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / RecordSourse для SubForm'ы / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]