Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Проблема!! Пропадают таблицы после выполнение сжатия БД  [new]
Domninsky
Member

Откуда: Москва
Сообщений: 655
Народ подскажите может кто сталкивался с такой проблемой:

БД разделенная под 97 аксессом, таблицыв ней скрыты с помощью способа взятого с форума см. пример ниже...

Dim dbs As Database
Dim tdf As TableDef
Dim Letter As String
Set dbs = CurrentDb
For Each tdf In CurrentDb.TableDefs
Set tdf = dbs.TableDefs(tdf.Name)
tdf.Attributes = 0
Next tdf

После скрытия таблиц таким способом и запуска затем штатного сжатия БД,
часть скрытых таблиц (не все), что очень странно исчезает бесследно.

Подскажите может кто знает, как с этим бороться?

Спасибо!
24 мар 05, 18:14    [1413277]     Ответить | Цитировать Сообщить модератору
 Re: Проблема!! Пропадают таблицы после выполнение сжатия БД  [new]
Serge Gavrilov
Member

Откуда:
Сообщений: 3248
Domninsky
Народ подскажите может кто сталкивался с такой проблемой:

БД разделенная под 97 аксессом, таблицыв ней скрыты с помощью способа взятого с форума см. пример ниже...

Dim dbs As Database
Dim tdf As TableDef
Dim Letter As String
Set dbs = CurrentDb
For Each tdf In CurrentDb.TableDefs
Set tdf = dbs.TableDefs(tdf.Name)
tdf.Attributes = 0
Next tdf

После скрытия таблиц таким способом и запуска затем штатного сжатия БД,
часть скрытых таблиц (не все), что очень странно исчезает бесследно.

Подскажите может кто знает, как с этим бороться?

Спасибо!


Скрывает таблицы атрибут dbHiddenObject (=1)
Как это вы c помощью tdf.Attributes = 0 скрываете?
Или я не понял что-то?
А пропажа таблиц с установленным атрибутом dbHiddenObject в Access 97 давно известный факт и об этом обычно предупреждают.
И ничего с этим сделать нельзя кроме как
Не использовать dbHiddenObject
или
не сжимать баззу
или
использовать другой Access
24 мар 05, 18:22    [1413295]     Ответить | Цитировать Сообщить модератору
 Re: Проблема!! Пропадают таблицы после выполнение сжатия БД  [new]
Domninsky
Member

Откуда: Москва
Сообщений: 655
вот здесь про этот способ написано...

https://www.sql.ru/forum/actualthread.aspx?bid=4&tid=47970
24 мар 05, 18:38    [1413350]     Ответить | Цитировать Сообщить модератору
 Re: Проблема!! Пропадают таблицы после выполнение сжатия БД  [new]
Serge Gavrilov
Member

Откуда:
Сообщений: 3248
Domninsky
вот здесь про этот способ написано...


И что, tdf.Attributes = 0 скрывает таблицы?
Пришлось открыть Access 97 и проверить - не скрывает.
А tdf.Attributes = 1 скрывает.

Может кто-нибудбь рассудит

А про удаление скрытых таблиц в Access 97 я еще в 1998 году писал
MSA97: dbHiddenObject
24 мар 05, 18:52    [1413378]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить