ADO.Recordset - Как узнать, что запись уже редактируется

05.04.2007, 16:29. **Показов** 2977. **Ответов** 14

Студворк — интернет-сервис помощи студентам

Если многопользовательский вариант
при доступе ADO.Recordset
как узнать что запись кем то модифицируется

@Arto · 05.04.2007, 18:00

Честно говоря я работаю с DAO, но не думаю чтоб на счет этого вопроса были принципиальные различия в DAO я делаю это следующим образом
Изначально в таблице , которая должна редактироваться я добавляю еще одно поле и записываю туда к примеру '0'.В случае если выполняется команда на редактирования рекордсета сначала проверяю , что в этом поле записано если '0' то записываю '1' и начинаю редактировать, то же самое проверяется естественно и для других пользователей и если во время моего редактирования кто-то попытается так же произвести редактирования того же Рекордсета увидев '1' выскакивает сообщение о временном запрете, после заканчивания редактирования при выходе я опять записываю туда '0' , тем самым открывая доступ другим пользователям
Удачи

06.04.2007, 02:44

Ага, а потом во время редактирования пропадет свет и твой флажок редактирования навечно останется в таблице.

@Arto · 06.04.2007, 16:32

Эта уже другая сторона дела, я имею привычку в моих проектах, особенно если они с БД, испльзуя реестр, так же проверять и на аварийный выход, опять при помощи 0 и 1 и в случае аварийного выхода, при новом входе все параметры восстанавливаются по умолчанию

@alexeypavlov · 09.04.2007, 20:44

Учите матчасть...

Recordset.EditMode
^^^^^^^^^^^^^^^^^^

adEditAdd (2) - The current record is new and has been added using the AddNew method but is not saved in the database

adEditDelete (4) - The current record has been deleted

adEditInProgress (1) - The current record has been changed but not saved in the database

adEditNone (0) - The current record is not being edited

10.04.2007, 01:40

Это работает только в рамках одного приложения. Вопрос же был как отследить что кто-то с другого компа редактирует запись в базе.

12.04.2007, 11:47

ADO-component имеет следующие events:

FieldChangeComplete
WillChangeField
RecordChangeComplete
WillChangeRecord
RecordsetChangeComplete
WillChangeRecordset

Продолжать или все уже ясно?

Всем привет...

@FozzyBear · 14.04.2007, 15:48

А свойство rs.LockType = adLockPessimistic поставить слабо?

@charsky · 10.05.2007, 19:48

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

@charsky · 10.05.2007, 19:48

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

14.05.2007, 02:29

Mezhdu Client i Server mozhno vo vremja seansa podderzhivat' avarijnuju svjaz' cherez Winsock... Esli svjaz' oborvalas' - znachit abgestoerzt!

@ArtP · 15.05.2007, 14:13

О чем вы спорите в женский праздник, то что запись находится на редактировании стандартными средствами можно узнать только если select был зделан со специальными ключами типа for update для Oracle (такой ключ есть и у Microsofta), но при этом есть возможность заблокировать страницу (у Microsofta). И обычный Select будет подвисать на этой таблице. Поэтому если количество пользователей не превышает 20, то дайте им спокойно работать. Если же ситуация сложная и они могут шарахнуть по одной записи, то используйте способ упомянутым первым. Ничего другого пока еще не изобретено.

16.05.2007, 01:28

По-хорошему, надо бы писать среднее звено в виде MTS/COM+ компонентов и обращаться к базе не напрямую, а только через методы этих компонентов. А уж внутри компонентов можно наставить разных блокировок сколько душе угодно.

@charsky · 18.05.2007, 19:56

Спасибо за рекомендации! Однако меня еще интересует как именно проблему аварийного выхода решает господин Arto

@Arto · 20.05.2007, 09:31

Попытаюсь быть кратким, в регистр или в спец таблицу БД при входе в программу проверяю что у меня там записано , если 0 то прописываю 1 и вхожу в прогу, при выходе опять прописываю туда 0, если выход был аварийный , то там естественно останется 1 и при новом входе в прогу при проверке на 0 и 1 будет ясно, что выход был аварийным
Удачи

Новые блоги и статьи Все статьи Все блоги /
WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .	Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .

rainger

	ADO.Recordset - Как узнать, что запись уже редактируется 05.04.2007, 16:29. Показов 2977. Ответов 14 Метки нет (Все метки) Если многопользовательский вариант при доступе ADO.Recordset как узнать что запись кем то модифицируется

@Arto 0 / 0 / 0 Регистрация: 05.04.2007 Сообщений: 55
	05.04.2007, 18:00
	Честно говоря я работаю с DAO, но не думаю чтоб на счет этого вопроса были принципиальные различия в DAO я делаю это следующим образом Изначально в таблице , которая должна редактироваться я добавляю еще одно поле и записываю туда к примеру '0'.В случае если выполняется команда на редактирования рекордсета сначала проверяю , что в этом поле записано если '0' то записываю '1' и начинаю редактировать, то же самое проверяется естественно и для других пользователей и если во время моего редактирования кто-то попытается так же произвести редактирования того же Рекордсета увидев '1' выскакивает сообщение о временном запрете, после заканчивания редактирования при выходе я опять записываю туда '0' , тем самым открывая доступ другим пользователям Удачи 0

HAOS
	06.04.2007, 02:44
	Ага, а потом во время редактирования пропадет свет и твой флажок редактирования навечно останется в таблице.

@Arto 0 / 0 / 0 Регистрация: 05.04.2007 Сообщений: 55
	06.04.2007, 16:32
	Эта уже другая сторона дела, я имею привычку в моих проектах, особенно если они с БД, испльзуя реестр, так же проверять и на аварийный выход, опять при помощи 0 и 1 и в случае аварийного выхода, при новом входе все параметры восстанавливаются по умолчанию 0

@alexeypavlov 0 / 0 / 0 Регистрация: 09.04.2007 Сообщений: 25
	09.04.2007, 20:44
	Учите матчасть... Recordset.EditMode ^^^^^^^^^^^^^^^^^^ adEditAdd (2) - The current record is new and has been added using the AddNew method but is not saved in the database adEditDelete (4) - The current record has been deleted adEditInProgress (1) - The current record has been changed but not saved in the database adEditNone (0) - The current record is not being edited 0

HAOS
	10.04.2007, 01:40
	Это работает только в рамках одного приложения. Вопрос же был как отследить что кто-то с другого компа редактирует запись в базе.

ComeRun
	12.04.2007, 11:47
	ADO-component имеет следующие events: FieldChangeComplete WillChangeField RecordChangeComplete WillChangeRecord RecordsetChangeComplete WillChangeRecordset Продолжать или все уже ясно? Всем привет...

@FozzyBear 0 / 0 / 0 Регистрация: 01.03.2007 Сообщений: 10
	14.04.2007, 15:48
	А свойство rs.LockType = adLockPessimistic поставить слабо? 0

@charsky 0 / 0 / 0 Регистрация: 10.05.2007 Сообщений: 3
	10.05.2007, 19:48
	Каким образом пользователи других компьютеров узнают, что произошел аварийный выход и необходимо сбросить отметки о редактировании? 0

ComeRun
	14.05.2007, 02:29
	Mezhdu Client i Server mozhno vo vremja seansa podderzhivat' avarijnuju svjaz' cherez Winsock... Esli svjaz' oborvalas' - znachit abgestoerzt!

@ArtP 3 / 3 / 0 Регистрация: 15.03.2007 Сообщений: 63
	15.05.2007, 14:13
	О чем вы спорите в женский праздник, то что запись находится на редактировании стандартными средствами можно узнать только если select был зделан со специальными ключами типа for update для Oracle (такой ключ есть и у Microsofta), но при этом есть возможность заблокировать страницу (у Microsofta). И обычный Select будет подвисать на этой таблице. Поэтому если количество пользователей не превышает 20, то дайте им спокойно работать. Если же ситуация сложная и они могут шарахнуть по одной записи, то используйте способ упомянутым первым. Ничего другого пока еще не изобретено. 0

HAOS
	16.05.2007, 01:28
	По-хорошему, надо бы писать среднее звено в виде MTS/COM+ компонентов и обращаться к базе не напрямую, а только через методы этих компонентов. А уж внутри компонентов можно наставить разных блокировок сколько душе угодно.

@charsky 0 / 0 / 0 Регистрация: 10.05.2007 Сообщений: 3
	18.05.2007, 19:56
	Спасибо за рекомендации! Однако меня еще интересует как именно проблему аварийного выхода решает господин Arto 0

@Arto 0 / 0 / 0 Регистрация: 05.04.2007 Сообщений: 55
	20.05.2007, 09:31
	Попытаюсь быть кратким, в регистр или в спец таблицу БД при входе в программу проверяю что у меня там записано , если 0 то прописываю 1 и вхожу в прогу, при выходе опять прописываю туда 0, если выход был аварийный , то там естественно останется 1 и при новом входе в прогу при проверке на 0 и 1 будет ясно, что выход был аварийным Удачи 0