File.GetFileTimes

GetFileTimes (Свойства файла)
Объект: Файл Статус разработки: Реализована Тип: Функция Обращение к БД: Сервер Исключения: Невозможно превратить в строку Визуальность: Нет

• Начальная страница
• Общее описание
• Объекты
• Файл

Функция получает время создания, изменения или доступа к файлу или папке. Если файл не существует (или недоступен), функция возвращает 0 и переменные получения времени не изменяются.

Синтаксис

File.GetFileTimes(<Путь и имя файла (STRING)>,<Время создания файла (DATE)>,<Время последнего доступа к файлу (DATE)>,<Время последней записи файла (DATE)>):<Файл существует и доступен (INT)>

Аргументы

• <Путь и имя файла (STRING)> - Путь и имя файла. Путь может быть как серверным и так и локальным (Имена файлов).
• <Время создания файла (DATE)> - (необязательный аргумент) (возможен аргумент-переменная (ByRef)) Переменная, в которую помещается дата и время создания файла. Если переменная пропущена, информация не будет использоваться.
• <Время последнего доступа к файлу (DATE)> - (необязательный аргумент) (возможен аргумент-переменная (ByRef)) Переменная, в которую помещается дата и время последнего доступа к файлу. Если переменная пропущена, информация не будет использоваться.
• <Время последней записи файла (DATE)> - (необязательный аргумент) (возможен аргумент-переменная (ByRef)) Переменная, в которую помещается дата и время последней записи файла. Если переменная пропущена, информация не будет использоваться.

Возвращаемое значение

Возвращается целое число.

Примеры

ФлСтарый:=0;
ВремяЗаписи:=0;
File.GetFileTimes(Имя,,,ВремяЗаписи);
If GetPeriod(ВремяЗаписи,Date(),4)<3601 Then //1 часа
  If AskQuestion("Во временной папке обнаружен существующий файл, сформированный не ранее, чем час назад. "+
      "Использовать существующий файл (ДА), или создать запрос заново (НЕТ)?",Q_WARNING+Q_YESNO)=R_YES Then
    ФлСтарый:=1;
  EndIf;
ElseIf GetPeriod(ВремяЗаписи,Date(),4)<7201 Then //2 часа
  If AskQuestion("Во временной папке обнаружен существующий файл, сформированный не ранее, чем два часа назад. Рекомендуется сформировать новый файл. "+
      "Использовать существующий файл, что быстрее (ДА), или создать запрос заново (НЕТ)?",Q_QUESTION+Q_YESNO)=R_YES Then
    ФлСтарый:=1;
  EndIf;
EndIf;

...