Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Jet 4.0 + dBase лочит каталог / 5 сообщений из 5, страница 1 из 1
24.11.2003, 10:15
    #32332612
Ray D
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jet 4.0 + dBase лочит каталог
Использую Jet 4.0 для доступа к dBase III.
Кусок кода:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
    dmConnection.adcConnection.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + TempKeyDir + ';Extended Properties=dBase III; mode=Read|Write|Share Deny None;Persist Security Info=True';
dmConnection.adcConnection.Open;
ADataset.Connection := dmConnection.adcConnection;
ADataset.CommandText := 'select * from [' + ExtractFileName(NewFileName) + ']';
ADataset.Open;
ADataset.Connection := nil;
for i :=  0  to KeyFiles.Count -  1  do
   DeleteFile(PAnsiChar(TempKeyDir + '\' + KeyFiles[i]));
dmConnection.adcConnection.Close;
RemoveDir(ExtractFilePath(NewFileName)); //!!!

Дак вот. RemoveDir не отрабатывает, говорит File Sharing Violation. Каталог пустой.
Куда рыть?
...
Рейтинг: 0 / 0
24.11.2003, 10:44
    #32332643
funikovyuri
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jet 4.0 + dBase лочит каталог
сюда
...
Рейтинг: 0 / 0
24.11.2003, 10:47
    #32332647
Evgenye
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jet 4.0 + dBase лочит каталог
Сделай для начала:
ADataset.Close;
Если не поможет пиши.
...
Рейтинг: 0 / 0
24.11.2003, 11:23
    #32332687
Ray D
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jet 4.0 + dBase лочит каталог
To
funikovyuri: отключение пулинга не помогло

To
Evgenye: эффект тотже
...
Рейтинг: 0 / 0
24.11.2003, 12:03
    #32332752
Evgenye
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jet 4.0 + dBase лочит каталог
Перед RemoveDir напиши
dmConnection.adcConnection.Close;
Если не поможет пиши.
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Jet 4.0 + dBase лочит каталог / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]