VBNet - Форум - Сжатие базы

Вопрос: Сжатие базы Добавлено: 27.10.02 17:25

Автор вопроса: paul_sn | Web-сайт: sergeyev.zzn.com

Кто-нибудь знает, как из VB можно сжать базу данных Access '97 ???

Ответить

Ответы Всего ответов: 3

Номер ответа: 1
Автор ответа:

LIS

Вопросов: 7
Ответов: 256

Профиль | | #1

Добавлено: 27.10.02 21:43

Переписать в новую / удалить старую / переименовать новую в старую...

Good luck

Ответить

Номер ответа: 2
Автор ответа:

Slepoy

Вопросов: 6
Ответов: 22

Профиль | | #2

Добавлено: 27.10.02 21:45

Программное сжатие базы данных

При работе с Базой Данных вы записываете, удаляете, редактируете свои данные и объем вашей БД постепенно растет. Остается он неизменным, даже если вы удалите все данные, т.к. удаленные записи машина Jet превращает в пробелы (грубо говоря). Для удаления этих пробелов время от времени проводят ''сжатие'' БД и она принемает оптимальный объем. Код приводится на примере БД Biblio.mdb

'Закрываем БД
Data1.Database.Close
'Вызываем метод CompactDatabase объекта DBEngine
'для сжатия, и сжимаем БД переименовывая ее
DBEngine.CompactDatabase "c:\biblio.mdb", "c:\new.mdb"
'Уничтоваем старую БД
Kill "c:\biblio.mdb"
'Присваиваем полученной, 'сжатой' БД
'ее прежнее имя
Dim OldDB
Dim NewDB
OldDB = "c:\new.mdb"
NewDB = "c:\biblio.mdb"
Name OldDB As NewDB
'Источник: http://www.relib.com/code.asp?id=402

Ответить

Номер ответа: 3
Автор ответа:

Slepoy

Вопросов: 6
Ответов: 22

Профиль | | #3

Добавлено: 27.10.02 21:47

Программное сжатие базы данных

'Источник: http://www.relib.com/code.asp?id=402

Ответить

Страница: 1 |