Отправлено: 20.01.06 12:20. Заголовок: Проверка наличии файла под XP

Есть простая процедура для открытия файла которая проверяет о наличии индексного файла и если нет создает его открывая его в EXCLUSIVE , но не срабатывает проверка о наличии индексного файла .
т.е. один user уже открыл файл и индекс уже создан (файл существиет) , второй user проверяет о наличии индекса и функция File( <file_name> ) отвечает .F.

ето под XP , по 98 работает на ура

в чем проблема друзья !!!

 Отправлено: 25.01.06 19:14. Заголовок: Re:

*______________________________
*_ _
*______________________________
func FileExist(F,Attr)
Default(Attr,"AHRS")
if empty(F)
ret .F.
end
ret !empty(directory(F,Attr))