Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проблема при сжатии ADO-database при помощи JetEngine.CompactData [D6]


brestmarket ©   (2002-10-01 01:44:00) 

Есть следующий код:

var
JetEngine: OleVariant;

...

DataModule1.ADOConnection1.Connected := true;

JetEngine:= CreateOleObject("JRO.JetEngine");
JetEngine.CompactDatabase(DataModule1.ADOConnection1.ConnectionString,
DataModule1.ADOConnection1.ConnectionString);
JetEngine:= Unassigned;

Возникает ошибка: EOleException "Cannot Open database. It may not be
a database that you application recognites or the file may be corrupt"

p.s. Тест с той же DataModule1.ADOConnection1.ConnectionString дает
положительный результат!

Одни советовали устанавливать монопольный доступ к БД при выполнении
данной операции - как это делается?

Что делать?


sniknik   (2002-10-02 10:44:00) [1]

а на обшибку "это одын" внимания не обращаем?

маленикий секрет, работать будет только если убрать все ошибки если хоть одну оставить не получится.


brestmarket   (2002-10-02 00:50:00) [2]

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


sniknik   (2002-10-01 11:01:00) [3]

DataModule1.ADOConnection1.Connected := false;
это одын
JetEngine.CompactDatabase(DataModule1.ADOConnection1.ConnectionString, { другая! база});
это два

монопольный можно в строке указать но здесь причина не в этом см. up.


Наверх

Титульная страница Поиск, карта сайта Написать письмо