Как запустить "Compact and Repair Database" из VB

[radislav]

Как запустить "Compact and Repair Database" или подобный процесс из VB над MS-Aссess data base ?

Thanx for help.

[Cyrax]

смотря с помощью чего. если работаешь через ADO то посмотри на http://vbrussian.com/ в статьях про ADOX.
если через DAO. то примерно так

Объект DBEngine предоставляет несколько методов, которые позволяют выполнять операции, связанные с поддержкой баз данных Jet. Речь идет о следующих операциях:
- уплотнение базы данных, при котором физически удаляется информация, предназначенная для удаления и з базы данных, благодаря чему сокращается объем занимаемого пространства на диске;
- восстановление базы данных, разрушенной в результате таких нетривиальных событий, как внезапное отключение питания в процессе сохранения инфомации в базе данных.

Использование метода CompactDatabase
Метов CompactDatabase используется для уменьшения размера базы данных после ее эксплуатации в течении некоторого времени.
Полный синтакис метода CompactDatabase имеет следующий вид:

Код: Выделить всё

DBEngine.CompactDatabase olddb, newdb, [locale], [options], [password]

При выполнении метода CompactDatabase на диске создается новая копия базы данных. Параметр olddb означает текущее имя .mdb-файла вашей базы данных. Параметр newdb представляет имя файла, в который процессор баз данных Jet скопирует новую уплотненную базу данных.
параметр locale оказывает влияние на порядок сортировки базы данных.
Параметр options устанавливает местоположение базы данных; он аналогичен соответствующему параметру метода CreateDatabase.
Восстановление базы данных
Восстановить разрушенную базу данных можно с помощью метода RepairDatabase объекта DBEngine. Этот метод принимает в качестве обязательного параметра только имя базы данных:

Код: Выделить всё

DBEngine.RepairDatabase "..\..\db\db.mdb"

Метот RepairDatabase, также как и CompactDatabase, не может выполнятся, если какой-либо пользователь откроет базу данных. Но в отличие от метода CompactDatabase, он не создает копии базы данных.
После использования етода RepairDatabase желательно выполнить метод CompactDatabase, поскольку в процессе восстановления базы данных внутри самого файла бызы данных могут быть создыны для временных нужд разного рода "образования данных", бесполезные для дальнейшего использования.
_________
Обдаботка баз данных на Visual Basic 6, Джеффри П. Мак-Манус, глава 3.

[radislav]

Спасибо !
Работает !!!!!!!!

[Cyrax]

да пожалуйса, мне не жалко...