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

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

Проверить существует ли сетевой путь или с сети ли сервер [D7, WinXP]


kukuikar ©   (2007-04-19 10:38:00) 

Есть такая задачка.
Резервное копирование данных пользователей. Все реализовано. Только осталось пара слабых мест.
Копирование происходит на локальный сервер.

Я проверяю возможно ли копирование так:
if not DirectoryExists(SyncPath) then
 try
 ForceDirectories(SyncPath);
 except
 ShowMessage('Продолжение работы программы невозможно. Сетевой путь не найден!');
 WriteLog('Аварийное завершение работы программы. Сетевой путь не найден!');
 Application.Terminate;
 end;


Что-то мне подсказывает что это не совсем правильно. Скорее всего нужно перехватить exception ошибки создания папки...
Вообщем теряюсь. Помогите советом.


kukuikar   (2007-04-19 15:14:00) [1]


> clickmaker ©   (19.04.07 13:04) [3]
>
> > Permissions для пользователя для папки
>
> GetFileSecurity()
> NetShareGetInfo()

Огроменное спасибо.
Коротко и ясно.


clickmaker   (2007-04-19 13:04:00) [2]


> Permissions для пользователя для папки

GetFileSecurity()
NetShareGetInfo()


kukuikar   (2007-04-19 12:58:00) [3]


> if GetFileAttributes(Path_To_Parent_Folder) = $FFFFFFFF
> then
>  не найден
> ?

Да. Спасибо.

А как можно прочитать Permissions для пользователя для папки?


clickmaker   (2007-04-19 10:58:00) [4]

if GetFileAttributes(Path_To_Parent_Folder) = $FFFFFFFF then
 не найден
?


Наверх

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