powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / RecordSourse для SubForm'ы
4 сообщений из 4, страница 1 из 1
RecordSourse для SubForm'ы
    #32087565
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
есть такой код:
Код: 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
RecordSourse для SubForm'ы
    #32087593
Glass
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а попробуйте строчку
Me.TempSumLen.Form.RecordSource = "SumLen"

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


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