Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Транзакци...

Тема: Транзакции

15.06.2007 21:08:35

Luckiy1

1 сообщения

Тема: Транзакции

Вопрос1: Имею форму в которой есть две подчиненные формы. Подчиненные формы в виде таблиц и между собой синхронизированны.
Источником строк в главной форме является таблица, a источником строк в 1 и 2 подчиненных формах является запрос.
Идея использования формы следующая. Когда пользователь активизирует какую-нибудь строку в подчиненной форме1 в подчиненной форме2 отображается набор записей соответствующей определенному реквизиту в форме1. При закрытии форма пользователю задается вопрос "Сохранить". Если пользователь говорит Да, то все внесенные изменения сохраняются. Когда пользователь выбирает Нет изменения не сохраняются.
У меня все хорошо работает когда главная форма содержит только одну подчиненную. Я в момент открытия формы запускаю транзакцию (Событие формы - Current), а когда закрываю либо завершаю транзакцию, либо произвожу откат.

Private WKS As DAO.Workspace
Private TRNS As Boolean
sub MyTrans()
Dim DB As DAO.Database
Dim QDF As DAO.QueryDef
Dim RS As DAO.Recordset
Dim PRM As DAO.Parameter

If TRNS Then
WKS.CommitTrans
End If

Set WKS = DBEngine.CreateWorkspace ("mwks", "Admin", "")
Set DB = WKS.OpenDatabase(CurrentDb.Name)
Set QDF = DB.QueryDefs("Сохраненный запрос")

For Each PRM In QDF.Parameters
PRM.Value = Eval(PRM.Name)
Next PRM

Me.Painting = False
Set RS = QDF.OpenRecordset
RS.LockEdits = False
Set ИмяПодчиненнойФормы.Form.Recordset = RS
Me.Painting = True

WKS.BeginTrans
TRNS = True
End sub

Если пытаюсь в подчиненной форме2 запустить транзакцию выдается сообщение "Данная операция не поддерживается в транзакциях"
Возможноли сделать что задумал?
Вопрос2: Почему не могу получить доступ к модулю формы. При работе приложения ошибок не возникает. Из всех форм у одной доступ к модулю закрыт. При попытке открыть Access зависает.

P.S. Общий раздел по формам
Автор: Luckiy от 29.07.2004 23:50:31 Источник ...

Страница 1 из 1

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Транзакци...

Поиск

Список форумов

Начало | Forums