Изменения в записи в таблице при открытой форме - блокировка записи

Question

У меня есть проект для многопользовательской базы данных: 1. Форма A используется для обновления Таблицы A и Таблицы B (одновременно по щелчку) 2. Форма B используется для просмотра Таблицы B, утверждения записей, а затем удаления их из Таблицы B

Проблема в том, что форма B открыта в записи (с первичным ключом CASENUMBER) и запись для этого CASENUMBER отредактирована в форме A.

Как установить блокировку для определенной записи, чтобы при ее просмотре в форме ее нельзя было просмотреть / отредактировать в другой?

Answer 1

Чтобы расширить ваш вопрос о синтаксисе:

Сначала вам нужно будет изменить оператор SQL, чтобы он включал IN_USE_A а также IN_USE_B, После извлечения записи, но до ее ввода в форму, вы должны установить набор записей на основе этой записи, а затем сделать поле для каждой таблицы истинным.

Dim strSQL As String
Dim myR As Recordset

strSQL = "SELECT * FROM TABLE_A WHERE criteria_here"

Set myR = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset)
'myR is now that record and can be manipulated/data pulled from

myR.Edit
myR![IN_USE_A] = TRUE
myR.Update

'perform tasks and such

'then just before closing

myR.Edit
myR![IN_USE_A] = FALSE
myR.Update

Set myR = Nothing