powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
22 сообщений из 22, страница 1 из 1
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280786
TJivich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не получается получить доступ к данным запроса

Dim obj1 As AccessObject, dbs As Object, obj2 As AccessObjectProperties
Set dbs = Application.CurrentData
For Each obj1 In dbs.AllQueries
MsgBox obj1.Name
For Each obj2 In obj1.Properties
MsgBox obj2.Count
Next obj2
Next obj1

На пятой строчке появляется фигня
"Введённое выражение содержит хреновую ссылку на объект, который закрыт или не существует"
Ничего не понимаю - Запрос сам есть и главное выводит его название как видите MsgBox, а пропертис
никак
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280787
TJivich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не получается получить доступ к данным запроса
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
    Dim obj1 As AccessObject, dbs As Object, obj2 As AccessObjectProperties
    Set dbs = Application.CurrentData
    For Each obj1 In dbs.AllQueries
        MsgBox obj1.Name
        For Each obj2 In obj1.Properties
            MsgBox obj2.Count
        Next obj2
    Next obj1


На пятой строчке появляется фигня
"Введённое выражение содержит хреновую ссылку на объект, который закрыт или не существует"
Ничего не понимаю - Запрос сам есть и главное выводит его название как видите MsgBox, а пропертис
никак
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280799
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Погодь, а какие у него совойства-то?
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280843
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А кто тебе сказал, что у каждой проперти есть каунт? Каунт есть у пропертиса

Это чушь:
For Each obj2 In obj1.Properties
MsgBox obj2.Count
Next obj2
Это не чушь
MsgBox obj1.Properteis.count
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280847
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Кажись лажу написал не подумав.
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280856
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не, не лажу :-)
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280878
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
obj2 должно быть просто Property (DAO.Property) т.е. элемент, а не коллекция
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280888
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да нет, это дело не меняет, я тоже попробовал для гарантии... ИМХО дело вроде в том, что у Query просто вообще нет Properties, пустая у нее коллекция
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280893
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Давайте перейдем в основной экземпляр топика:\r
\r
/topic/51521
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280894
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
См. еще пару замечаний во втором экземпляре топика:\r
\r
/topic/51520
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32280902
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
    Dim obj1 As AccessObject, dbs As Object, obj2 As AccessObjectProperties
    Set dbs = Application.CurrentData
    For Each obj1 In dbs.AllQueries
Debug.Print obj1.NAME
Debug.Print obj1.DateCreated
Debug.Print obj1.DateModified
Debug.Print obj1.IsLoaded
    Next obj1


а что надо?
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281029
TJivich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
        MsgBox obj1.Properties.Count


Видите строку - он и от этого пятиться.

Может Вы вообще другой вариант предложите.
Мне просто надо получить доступ к определённому полю и его значениям и усё
Вообще странно может у меня Access глюкнутый, а вроде обычный 2000
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281039
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тебе нужно извлечь значение определенной записи из таблицы или запроса ?????
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281074
TJivich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Именно так.
И всёёё?
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281080
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2TJivich:
Вообщем тебе намекают, что AllQueries("НазваниеЗапроса").Properties является ПУСТОЙ коллекцией, там ничего нет (поэтому и .Count и For Each obj2 In obj1.Properties выдают ошибку), а все доступные свойства, например:
Код: plaintext
1.
2.
3.
4.
Debug.Print obj1.NAME
Debug.Print obj1.DateCreated
Debug.Print obj1.DateModified
Debug.Print obj1.IsLoaded

содержаться сразу, как свойства этого объекта, а не через объект-коллекцию Properties

Так что ты в итоге хочешь конкретно получить?
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281086
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я в осадке
от топика
начал за упокой
а закончил за здравие.
мне бы так научиться
задавать вопросы.
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281093
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А потом пришел лесник и всех разогнал :)
Долго тебя че-то не было...
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281099
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
расшалилися детишки
и девчонки и мальчишки.
ТЖивич малость загружает
смуту, хаос поднимает
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281100
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
набери в справке или в поиске в форуме слово Recordset

или Dlookup
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281249
TJivich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Стихоплётишь ты прикольно
Хам трамвайный
Спору нет
Чё припёрся ты на тусу,
Подгружаешь ты людей?
Гонишь бучу на тиджея
Не позволю посрамлять...

Все претензии пожалуйста шлите на ё-маил: igoryokg@mail.ru
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281287
Фотография Темный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Recordset - your choice.
RTFM.
...
Рейтинг: 0 / 0
Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
    #32281409
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Данные из таблицы можно получить так
Dim rst1 as Dao.Recordset
Set rst1=CurrentDB.OpenRecordset("Select * From Таблица1")
While Not Rst1.EOF
Debug.Print Rst1!Поле1
Rst1.MoveNext
WEnd
Set rst1=Nothing
и так
Debug.Print Dlookup("Поле1","Таблица1","Поле2='Маруся'")
Есть еще DMin,DMax и прочие всякие DCount

Ну ты даешь, блин. В том смысле, что здорово книжки читаешь и вопросы задаешь.
...
Рейтинг: 0 / 0
22 сообщений из 22, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не получается получить доступ к данным запроса Ну и чё Сан Саныч?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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