|
|
|
| Уважаемые Знатоки! Работаю с ACCESS уже 5 лет.Впервые столкнулся с такой ситуацией: при открытии БД не показывает ни одной таблицы, ни одной формы, ни одного отчета. Не показывает даже окно БД. В тоже время по размеру БД я вижу что все есть. Копии БД к сожалению нет. Импорт из нее в новую БД не дает результата (т.к. исходная не показывет ничего). ПОМОГИТЕ !!! | |
|
| |
|
|
|
| Люди делятся на две категории
Одни делют резервные копии,
Другие будут делать резервные копии.
А если заархивировать файл сколько он весит? | |
|
| |
|
|
|
| Maket Partner.mdb (до архивирования) 287814759
Maket Partner.zip (после архивирования) 287814759 | |
|
| |
|
|
|
| откройте каким-нибудь hex-редактором
если нолики - начинайте жизнь с нового листа | |
|
| |
|
|
|
| а стандартные процедуры не помогают Панель управления -Администрирование - Источники данных (ODBC) - Восстановить или сжать (только попию создайте)
странно что не архивирует | |
|
| |
|
|
|
| Жаль Леонида.....
Может поможет возврат винды в точку восстановления на пару дней назад....
после такого ниразу не удавалось восстановить, хотя вроде бы Osmor как то извлекал.....
========================================================================
Давайте дружно позовём:
Osmoooooooooor !!!! | |
|
| |
|
|
|
| у EasyRecovery Pro - есть функция Восстановление поврежденных БД Акса - попробуй. | |
|
| |
|
|
|
| Попытайтесь удаленно (из другой базы) подключиться к битой и попрыгать по таблицам.
Что-то типа
Dim DbE As DBEngine, Dbs As Database
Set DbE = New DBEngine
Set Dbs = DbE.OpenDatabase("c:\1.mdb", False, False, ";pwd=")
Dim NameAllTables As TableDef, i As String
For Each NameAllTables In Dbs.TableDefs
i = i & NameAllTables.Name & vbCrLf
Next
'далее с этой i делаем что хотим, там все названия таблиц.. (в т.ч. служебных)
MsgBox i
'ну и закрываемся
Dbs.Close
Set Dbs = Nothing
Set DbE = Nothing
Удачи :) | |
|
| |
|
|
|
| полностью согласен с accorn как альтернатива посмотри сообщение:
Восстановление таблицы А2003 Cerber | |
|
| |