powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Правильное добавление записей в иерархические рекордсеты ADO
2 сообщений из 2, страница 1 из 1
Правильное добавление записей в иерархические рекордсеты ADO
    #38282515
GermanU
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Суть проблемы следующая:
Как правильно добавляются записи в иерархические рекордсеты созданные, либо с использованием сервис провайдера MSDataShape, либо Data Environment?
Рекордсеты создаются без проблемы, в самый верхний по уровню рекордсет запись добавляется без проблем (метод AddNew). Если после добавления записи сразу сделать Update и добавить запись в подчиненный рекордсет, то такая запись не добавляется. Для того, чтобы добавить запись нужно сделать сделать перезапрос (Requery) для верхнего рекордсета и только потом запись без проблем можно добавить в подчиненный рекордсет. Следующие за первой подчиненной записью, другие записи добавляются без проблем. Метод с перезапросом конечно работает, но во первых это лишний перезапрос, а значит лишние тормоза, во вторых приходится сохранять/восстанавливать ту запись, с которой была работа до перезапроса и в третих для отключенного рекордсета перезапрос просто не применим.
Хотелось бы узнать как это делают другие, неужели с такими же извращениями?
...
Рейтинг: 0 / 0
Правильное добавление записей в иерархические рекордсеты ADO
    #38282625
GermanU
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Путем экспериментов проблема разрешилась таким образом

Код: vbnet
1.
2.
3.
4.
5.
If m_RS2.BOF Or m_RS2.EOF Then
            vBookmark = m_RS1.Bookmark
                dgData1.RefetchRow
            m_RS1.Bookmark = vBookmark
        End If
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Правильное добавление записей в иерархические рекордсеты ADO
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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