Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: #Удалено
 
 автор: Гоблин   (02.10.2009 в 21:05)   личное сообщение
 
 

Привет все.
Вот ситуевина. В форме есть подчиненная форма1 которая имеет свою подчиненную форму 2, на которую навешано еще 3 штуки - 3,4,5. Все работает при добавлении записи, изменении. Однако, если в форме 2 удалить запись, то в 3,4,5 появляется #Удалено во всех полях. Ни requery, recalk, refresh, ни основной и каждой формы в отдельности не помогают. Более того, если внести записи во все формы и тут же удалить запись в форме 2 (допустим заметили ошибку), в подчиненных формах все записи остаются как ни в чем не бывало. При закрытии основной формы или попытке перейти на другую запись в форме 2 акс ругается на связанные таблицы и по закрытии удаляет все. Связи в таблицах (1:много) отрабатывают как надо.
Как переобновлять форму? На свойства (удаление), (после подтверждения del) ни requery ни что другое не помогает. Спасает только если в форме 1 перейти на другую запись и вернуться обратно.

  Ответить  
 
 автор: Силblч   (02.10.2009 в 21:26)   личное сообщение
 
 

меняйте рекордсоурс

рекордсоурс=рекордсоурс

  Ответить  
 
 автор: Гоблин   (02.10.2009 в 21:55)   личное сообщение
 
 

Новое веянье в VBA. Заметил его частое применение в последнее время. Однако Me.RecordSource = Me.RecordSource на форму 2 после подтверждения del не помогло. Пытался поставить на форму 3, не помогло. #Удалено все равно появляется.
На свойство после обновления результата не дало.

Куда его вобще совать?

  Ответить  
 
 автор: snipe   (02.10.2009 в 22:42)   личное сообщение
 
 

на основную форму
она захватила записи

  Ответить  
 
 автор: Силblч   (03.10.2009 в 08:49)   личное сообщение
 
 

это давно и надежно работающее забытое старое ;)

  Ответить  
 
 автор: Гоблин   (04.10.2009 в 16:22)   личное сообщение
 
 

Все перепробовал. Не помогает хоть тресни. Какие еще предложения будут?
Как-то сделаю переброс фокуса на форме 2 на новую запись и обратно. Так отрабатывает.

  Ответить  
 
 автор: Анатолий (Киев)   (05.10.2009 в 11:03)   личное сообщение
 
 

Как вы делаете requery субформы?
Me![Субформа].requery
или
Me![Субформа].Form.requery

Есть разница.

  Ответить  
 
 автор: Гоблин   (05.10.2009 в 12:26)   личное сообщение
 
 

Вообще Me![Субформа].requery
Пробовал даже Forms![Форма1]![Форма3].requery
Лепил обновление на форму 2, через нее. Судя по всему все это неверный синтаксис. Попробовал Me![Субформа].Form.requery - не помогло. А вот если в форме 2 курсором перещелкнуть на строку добавления записи и перещелкнуть обратно - #Удалено пропадает. Пробовал эту форму обновлять - ничего. Основную - результат тот же. Приравнивал рекордсурс, все по советам. Не помогает. Че-то въедливый этот #Удалено будь он неладен.

  Ответить  
 
 автор: Анатолий (Киев)   (05.10.2009 в 14:12)   личное сообщение
 
 

Как связана форма2 с субформами 3,4,5?
Субформы 3,4,5 - третий уровень вложенности. Возможно причина в этом.
Попробуйте на событие AfterDeleteConfirm формы2 выполнять Requery субформ 3,4,5.

  Ответить  
 
 автор: Гоблин   (05.10.2009 в 18:32)   личное сообщение
 
 

Сделал как сказали.
Me![форма3].form.Requery
Me![форма4].form.Requery
Me![форма5].form.Requery
Потом
Forms![форма1]![Форма3].Requery
Forms![форма1]![Форма4].Requery
Forms![форма1].[Форма5].Requery
Не прошло. Даже если саму форму2, на которую навешаны 3,4,5 в эту строку впихать.Уже дошло до вот чего
Me.Parent![Описание заключение рекомендации].Requery
Me.Parent![подчиненная форма Биометрия].Requery
Me.Parent![подчиненная форма Исследование орган].Requery
При удалении записи из формы 2 в 3,4,5 появляется #Удалено и только перещелкиванием фокуса на форме 2 или 1 это #Удалено исчезает. Скорей всего из-за сложнонамудреного кода с различными блокировками в формах. Но там иначе нельзя, а по другому не умею.

  Ответить  
 
 автор: Гоблин   (09.10.2009 в 23:35)   личное сообщение
 
 

Разобрался со всем этим. Несуществующие пути наворотил в дебрях кодов.

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList