Нда. Есть форма с источником данных типа

select Table1.*, Table2.MyField from Table1 left join Table2 on ...

Что было нужно - показывать поля таблицы1 и одно из полей (которое не нужно и нельзя редактировать) таблицы2. Почему не с помощья поля со списком? потому-что выпадающий список и сама кнопка, его открывающая не нужна совершенно.

Изменение, добавление записей работает нормально, а при удалении записи из Table1 мне нужно подправлять одно из полей записи Table2 (не MyField). Оно исправляется нормально, но даже не в сети после этого выскакивает сообщение, что, дескать, запись была изменена другим пользователем и не удаляет запись Table1. А иногда все работает. Примерно фифти-фифти.

Вопрос: что делать, чтобы удалялось нормально? Вернуться к полю со списком, или прошептать волшебное слово? (несогласованный набор записей ставил - результат тот же).

Спасибо большое всем.

----------
И в дополнение. Час провозился с ТриВью - не хотел заполняться. Аналогичная форма - работает нормально. Тупо тот же код переношу в другую - перестает. Выяснилось, что перед заполнением за каким-то надо ему сказать:

me.MyTreeView.Visible = True ' Хотя он и так Visible!!
me.MyTreeView.SetFocus

Тяжела, млин, доля разработчика... :(

2ВС
А то поле в Table2, по которому идет связь, - оно Primary Key?
Угумсь, по ним налажена связь в схеме данных.

2ЛП
Ты что, в форме, на событии Delete, т.е. до фактического удаления, правишь набор?
Угу. Но удаляю я запись Table1, а правлю запись Table2.

Ну дык и правильно оно тогда делает что ругается.
Я понимаю, что наверное правильно. Но ведь не всегда ругается. Иногда сразу молча удаляет. И всегда на второй-третий раз удаляет.

Версия аксеса какая?
'02

Через один и тот же Connection/Workspace и открывай рекордсет (потом подсовывай его форме), и удаляй запись. Может и получится.
А можно пару строчек, а то наша не понял, что это значит...

скорей бы завтра кончилось...

Ой-ой!
Надеюсь никто еще не запутался:

Но удаляю я запись Table1, а правлю запись Table2.

надо было с точностью до наоборот:

Но удаляю я запись Table2, а правлю запись Table1.

2Лифчик.
Да, действительно похоже. Только я-то DoCmd там не делаю никаких. Для порядка выкладываю обработчик Delet'а:



То же самое происходит и при удалении посредством DAO.Recordset.

А вот источник данных формы:

Сделать я все сделал:

Dim t as string

Private Sub Form_Delete(...)
t=me.NumOrder
End Sub

Private Sub Form_Current()
if t<>"" theb
...
t=""
endif
End Sub

Но осталось совершенно непонятно, почему акцесс то разрешал удалять запись, то нет...

2ЛП
Забыл :(

А что же случиться-то?..

2ЛП
Я сейчас пойду проверять, сколько раз будет куррент, если удаляется сразу несколько записей. Почему-то кажется, что только один раз... :((
Да и через таймер и коллекцию неспортивно - а ну как не успеет... Млять. Пятница... Откат к полям со списками. Черт с ними.

2ЛП
Попробую, спасибо большое...

Придумал.
Если не заработает вариант ЛП, сделаю функцию, которой буду передавать идентификатор изменяемой записи. Она будет в цикле с DoEvents дожидаться удаления записи в Таблице1, а после этого изменять запись Таблицы2. Интересно, а что сможет ли она одновременно запуститься дважды?..

Сделал по варианту ЛП.
После выполнения в полях записи вылезает "#Удалено".
Ну и черт с ним, думаю.
Объяснил, что это не страшно, что до лучших времен...
Так они (юзеры) начали эти записи "#Удалено" удалять повторно.
И почему-то стали пропадать записи Таблицы2.
Эх, тоска (и ведь опять пятница!)...
Выкину всех джонов. Гори они...

Обновлять набор = самому позиционироваться на соседнюю запись. (а потом захотят еще чтобы в той же позиции экрана).
Накер. Щас сделаю полями со списками.
----
ЗЫ. А после удаления "#Удаленных" натурально бьется запись из связанной таблицы. Сейчас у себя попробовал. Писец.

2 assa
- табличная форма...