File.CopyFile

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

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

Функция производит копирование файла из одной папки в другую. Файлы могут как находиться на сервере, так и локально, возможно также скопировать файл с сервера на локальный компьютер и наоборот.

Синтаксис

File.CopyFile(<Исходный файл для копирования (STRING)>,<Результирующий файл (STRING)>,<Заменять существующий (INT)>=1):<Файл скопирован успешно (INT)>

Аргументы

• <Исходный файл для копирования (STRING)> - Путь к существующему файлу. Путь может быть как серверным и так и локальным (Имена файлов).
• <Результирующий файл (STRING)> - Путь к файлу-результату. Путь может быть как серверным и так и локальным.
• <Заменять существующий (INT)> - (необязательный аргумент) Числовое аргумент: 1 (по умолчанию) -- если файл-результат уже существует, он будет заменен копируемым, 0 -- если файл-результат функция не будет выполнять никаких действий и вернет 0.

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

Возвращается числовое значение 1, если копирование осуществлено успешно, иначе 0.

Примеры

Файл:="";
If OpenFileDialog(Файл,"Выберите файл печати",,1) Then
  Файл:="Logotips\Stamps\"+GetFileName(Файл);
  If File.DoesFileExist(Файл) Then
    If AskQuestion("Файл печати с таким именем уже используется, заменить?",Q_QUESTION+Q_YESNO)<>R_YES Then
      Exit;
    EndIf;
  EndIf;
  If not File.CopyFile(Источник,Файл,1) Then
    Box("Проблема с копированием картинки! Попробуйте еще раз!",Q_STOP);
    Exit;
  EndIf;
EndIf;