| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сжатие *.mdb через ADO
ShadowSmart © (2003-12-10 14:22:00)
Подключаюсь к базе *.mdb через ADO
Со временем база сильно разрастается
В MS Access есть команда "Сжать и восстановить...". Можно ли как-нибудь сделать тоже самое через ADO (из своей программы)?
Davinchi (2003-12-10 16:00:00) [1]
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var MyJetEngine : JetEngine;
strDataSource,strDataDest:string;
begin
stRun.Database1.Connected:=False;
strDataSource := "Data Source="+Path+"base\sh26.mdb;";
strDataDest := "Data Source="+Path+"base\sh26b.mdb;";
MyJetEngine := CoJetEngine.Create();
try
MyJetEngine.CompactDatabase(strDataSource, strDataDest);
finally
MyJetEngine := nil;
end;
Kadr (2003-12-10 15:56:00) [2]http://xatka.vov.ru/cgi-bin/read.pl?chapter=rsource&query=6&file=source5.txt
Davinchi (2003-12-10 15:49:00) [3]
У меня такая же прпоблема и я тоже ищу ее решение!!!
Господа, посоветуйте какже все-таки сжимаюся Ado таблици и желательно реальными примерами, а не ссылками на поиск!!!
Kuusineimi (2003-12-10 15:42:00) [4]
Вообче-то поиск рулит.. время от времени обсуждается... волшебные три буквы - JRO
| |
