Помогите разобраться с бд ACCESS

Программирование на Visual Basic for Applications
vlad_mol
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 01.07.2011 (Пт) 7:53

Помогите разобраться с бд ACCESS

Сообщение vlad_mol » 01.07.2011 (Пт) 8:07

Доброго времени суток всем.
База данных досталась по наследству.Прежний работник был сокращен, так что не пообщались.Основной вопрос - можно ли определить,
были ли удалены в этой базе модули и макросы. И второе- не могу понять как участвует в расчетах поле GZF таблицы TEXNIKA.Заранее спасибо.

mdb.zip
(927.67 Кб) Скачиваний: 140

ger_kar
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1957
Зарегистрирован: 19.05.2011 (Чт) 19:23
Откуда: Кыргызстан, Иссык-Куль, г. Каракол

Re: Помогите разобраться с бд ACCESS

Сообщение ger_kar » 01.07.2011 (Пт) 22:24

vlad_mol писал(а):Основной вопрос - можно ли определить,были ли удалены в этой базе модули и макросы
Конечно можно, если что-то удалить, то в процессе работы Access будет сильно ругаться на отсутствующие модули. Т.е. по выводимым ошибкам. Второй метод это анализ кода, но так значительно дольше. Если работает нормально и ошибок "Не найден ..." не выдает, то скорее всего ничего не удаляли.
Бороться и искать, найти и перепрятать

dormouse
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 140
Зарегистрирован: 10.01.2007 (Ср) 21:58
Откуда: Волжский

Re: Помогите разобраться с бд ACCESS

Сообщение dormouse » 07.07.2011 (Чт) 21:12

в инете нашлось такое:
Q: Как восстановить yдаленнyю из базы фоpмy/таблицy (клавишей DEL), если yпаковка базы еще _не_ пpоизводилась?
A: Спеpва надо откpыть таблицy MSysObjects, найти там по полю DateUpdate yдаленный объект, запомнить его имя в поле Name, затем, _не_закpывая_ MSysObjects, надо в Окне отладки написать (Аксесс 2.0):

DoCmd CopyObject , "Form1", A_FORM, "<имя yдаленной фоpмы>" DoCmd OpenForm "Form1", A_DESIGN (Mikhail Gorshkov 5020/1240.6)

Для Аксесса97 этим методом фоpмy не восстановить :( но таблицy - можно:
DoCmd.CopyObject , "Tabl1", acTable, "<имя yдал.таблицы (из MSysObjects)>" DoCmd.OpenTable "Tabl1", acDesign ' Для 2.0 соот-но A_TABLE & A_DESIGN

После появления объекта сохpаните его с дpyгим именем :) Если yдалено более 1 объекта, спеpва сделайте несколько копий базы, так как восст-ный объект может пеpеписать запись в MSysObjects дpyгого yдаленного объекта.

таблицу MSysObjects можно найти, включив опцию "системные объекты" в разделе "вид" параметров акцесса.
VBA, MSA97


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 8

    TopList