Как программно сжать базу Access 2000

[Luzin]

Как программно сжать базу Access 2000 из Visual Basic 6.0

[RayShade]

В DAO есть метод DBEngine.CompactDatabase

[Luzin]

В DAO есть метод DBEngine.CompactDatabase

А через ADO возможно?

[RayShade]

Не в курсе. Никогда не пытался этого через ADO сделать. Думаю, что нет. А чем DAO то не подходит?

[Luzin]

Я просто с DAO не работал
только с ADO

[RayShade]

Ничего по моему в DAO сложного нет То есть я думаю, для такой операции как сжатие многого переосмысливать не придется

[Luzin]

Кинь пример?

[RayShade]

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

Sub mycompact()
Dim dbe As New DBEngine
With dbe
.CompactDatabase "c:\1.mdb", "c:\2.mdb"
End With
End Sub


Учти, что сжимаемая база не должна в этот момент никем быть открыта.

[Luzin]

Понял
Спасибо за пример, а смотрел ветку
"Сравнение записей в базе Access "
http://www.vbnet.ru/forum/show.asp?id=18240
может подскажешь чего?

[RayShade]

Этот же вопрос был и в этом форуме На него так сразу не получается ответить, а время влезть в вопрос у меня будет только во вторник.

[Luzin]

Я знаю, что он был, ведь это мой вопрос
и кто-то его убил , я даже догадываюсь кто.
Если все будет поглядишь, что можно сделать будеть по вопросу.

[RayShade]

Никто его не убивал. Я его перенес в этот форум просто. Посмотри внимательно, он в том же разделе что и этот топик

[VisMajor]

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

Sub mycompact()
Dim dbe As New DBEngine
With dbe
.CompactDatabase "c:\1.mdb", "c:\2.mdb"
End With
End Sub


Учти, что сжимаемая база не должна в этот момент никем быть открыта.

Простите господа. Не подскажите ли жа-а-а-а-алкому ламеру, что есть из себя процес сжатия и остается ли сжатая база полнофункциональной.

Заранее благодарен. Юрий.

[GSerg]

Файл mdb имеет кластерную сруктуру на манер таковой у винчестера. Соответственно, он подвержен "внутренней фрагментации", когда остаются пустые "кластеры". Сжатие ("дефрагментация") позволяет похерить все пустые "кластеры" и записать базу компактно.

[VisMajor]

Файл mdb имеет кластерную сруктуру на манер таковой у винчестера. Соответственно, он подвержен "внутренней фрагментации", когда остаются пустые "кластеры". Сжатие ("дефрагментация") позволяет похерить все пустые "кластеры" и записать базу компактно.

Спасибо за пояснение.
И если можно еще один вопрос. Access формирует MDE файлы. Что это такое и с чем его едят?

[Cyrax]

Файл mdb имеет кластерную сруктуру на манер таковой у винчестера. Соответственно, он подвержен "внутренней фрагментации", когда остаются пустые "кластеры". Сжатие ("дефрагментация") позволяет похерить все пустые "кластеры" и записать базу компактно.

позвольте Вас поправить...
на самом деле при удалении записей из базы данных они не удаляются физически, а помечаются как удаленные. так вот процесс сжатия базы данных - это физическое удаление этих записей из файла, ну и после этого "дефрагментация" файла...

[RayShade]

2 Cyrax и GSerg

Вы оба правы Cyrax - то что ты скащзал применимо к базам в общем, а то что сказал GSerg - только к MDB

[GSerg]

Проведя столь полезную дискуссию, ответим наконец на вопрос человека

mde - это скомпилированный mdb. Этот файл можноо юзать в плане заполнения, удаления, получения отчётов, короче, выжимания результатов, а менять саму структуру базы нельзя. На эти файлы много ограничений по версиям Access. Например, Access XP может заюзать файлы mdb всех предыдущих версий, а, допустим, mde от Office97 открывать откажется.

[VisMajor]

Спасибо.

[Ivan1]

Извините что вмешиваюсь
но скажите в одном mdb у меня 5 таблиц
они будут накапливаться до кокого размера
может рости mdb
Может у кого нибуть есть какой нибуть
электроный справочник по DAO
может вышлите.

[GSerg]

Безразмерный он...

[Cyrax]

Извините что вмешиваюсь
но скажите в одном mdb у меня 5 таблиц
они будут накапливаться до кокого размера
может рости mdb
Может у кого нибуть есть какой нибуть
электроный справочник по DAO
может вышлите.

тут скорее всего уже будут действовать не ограничения формата и процессора баз данных, а ограничения файловой системы.
FAT поддерживает файлы размером не более 2Гб, FAT32 - 4Гб, а NTFS - в теории 16 экзабайт ( (2^63) - 1 )

[ASD]

И смотря скока записай... а то тормоза появятся...
Причем я бы не стал делать базу которая будет иметь
немеряный размер + тонна записей и для это юзать Access.

А вот такой вопрос. А реально ли как то без DAO сжать?
Если я юзаю ADO то както еще DAO для этого подключать накладно.
Например такие СУБД как MySQL умежт это делть через SQL запрос.

[Luzin]

я так и не нашел как из ADO сделать
потоэтому сделал через JRE (хотя через DAO было бы легче)

[Cyrax]

А вот такой вопрос. А реально ли как то без DAO сжать?
Если я юзаю ADO то както еще DAO для этого подключать накладно.
Например такие СУБД как MySQL умежт это делть через SQL запрос.

еще как реально. для этого есть библиотека, "Microsoft ADO Ext. x.x for DDL and Security" называется. x.x - это номер версии (на данный момент 2.5, кажется)
на http://vbrussian.com пара статей про этот самый ADOX лежали.

[basicom]

Продолжим тему.
А если записи из таблицы не удалять а только перезаписывать многократно каждую, то имеет смысл производить сжатие или проще удалить самые древние записи?

[Rainbow]

я так и не нашел как из ADO сделать
потоэтому сделал через JRE (хотя через DAO было бы легче)

MSDN в статье с привлекательным заголовком "HOWTO: Compacting Microsoft Access Database via ADO" приводит пример с подключением библиотеки "Microsoft Jet and Replication Objects":

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

Dim jro As jro.JetEngine
Set jro = New jro.JetEngine
jro.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\nwind2.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\abbc2.mdb;Jet OLEDB:Engine Type=4"

Видимо, ничего более умного они не придумали