Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.22;
Скачать: CL | DM;

Вниз

Помогите по Access   Найти похожие ветки 

 
Egor111   (2002-07-31 09:37) [0]

Как программно выполнить операцию
Сжать\восстановить базу данных в Access
(а то больно она сильно вырастает)


 
Tornado ©   (2002-07-31 10:20) [1]

Используй компонент KADAO, он все это умеет. Удачи


 
sniknik ©   (2002-07-31 10:31) [2]

во люди! две строчки написать лень. А устанавливать/учить компонент?
var je: Variant;
begin
je:=CreateOleObject("JRO.JetEngine");
je.CompactDatabase("Provider=Microsoft.Jet.OLEDB.4.0;"+
"Data Source=D:\Base.mdb",
"Provider=Microsoft.Jet.OLEDB.4.0;"+
"Data Source=D:\Compressed.mdb;"+
"Jet OLEDB:Encrypt Database=True");

есть еще варианты через DAO и ADOX. но мне искать в лом.


 
zx ©   (2002-07-31 10:52) [3]

sniknik ©
Такой вариант сжимает но по-моему не восстанавливает базу.


 
sniknik ©   (2002-07-31 11:09) [4]

Взял их Хелпа по JET, (с бейсика перевел) написано что действие анологично Access-овскому Tools->Database Utilities->Compact and Repair Database...
Так ли это на самом деле не проверял. Не было еще битых баз. Просто раз в 10 дней делаю эту процедурку при старте проги и не думаю ни о чем :-). Вот если будет и она не справится а в Access-е сможет.....


 
zx ©   (2002-07-31 13:08) [5]

У меня падала. Этот код не восстановил.
Access восстановил, правда потерял пару таблиц:(((


 
Egor111   (2002-07-31 13:10) [6]

>sniknik
Спасибо, все ОК!!!



Страницы: 1 вся ветка

Текущий архив: 2002.08.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
1-71209
inc(665)
2002-08-09 12:49
2002.08.22
вопрос по RxRichEdit


3-70950
Shaman
2002-07-29 23:18
2002.08.22
Компонента для визуального построения выражения для фильтра


1-71121
maxim2
2002-08-13 09:17
2002.08.22
Каким образом загрузить курсоры и картинки из res файла


14-71351
vads
2002-07-27 11:44
2002.08.22
Купил книгу Ч.Калверт, К.Рейсдорф - Borland C++Builder 5. Энцикл


1-71231
3asys
2002-08-09 01:04
2002.08.22
Запись и считывание TTreeNode.Data