Если программа разработана с использованием базы данных Access, то при повреждении базы данных Access при входе в программу появится следующее сообщение:
Невозможно открыть имя базы данных. Возможно, это не та база данных, которую распознает ваше приложение, либо файл может быть поврежден. (Ошибка 3049)
Если в программу не добавлено решение об ошибке, программа прервется и выйдет из строя, что создаст у пользователя очень плохое впечатление. Чтобы избежать этой ситуации и даже не дать пользователю обнаружить, что база данных повреждена, должен использоваться следующий программный код. добавиться к судье:
PRivateSubForm_Load()
База данных Димдбас
OnErrorGoToerror1
Setdb=OpenDatabase("c:/test.mdb")
Онерроргото0
:'Нормальная программа запускается
:
ВыходSub
ошибка1:
IfErr=3049Тогда база данных повреждена
DBEngine.RepairDatabase"C:/test.mdb"
Резюме
Еще
MsgBoxErr&Error(Эрр)
КонецЕсли->