Функция Rename

Статья
11/05/2008

Обновлен: Ноябрь 2007

Переименовывает файл или каталог диска.

Функция My обеспечивает более высокую производительность и быстродействие операций ввода и вывода, чем Rename. Дополнительные сведения см. в разделе Объект My.Computer.FileSystem.

Public Sub Rename( _
   ByVal OldPath As String, _
   ByVal NewPath As String _
)

Параметры

OldPath
Обязательный. Выражение String определяет имя и расположение существующего файла. OldPath может содержать каталог и диск файла.
NewPath
Обязательный. Выражение String, определяющее новое имя и расположение файла. NewPath может содержать каталог и диск конечного расположения. Имя файла, заданного NewPath, не может существовать.

Исключения

Тип исключения	Номер ошибки	Условие
ArgumentException	5	Недопустимый путь.
FileNotFoundException	53	Файл OldPath не существует.
IOException	58	Файл NewPath уже существует.
IOException	75	Нет доступа.
IOException	74	Нельзя переименовать с указанием другого диска.

См. столбец "Номер ошибки", если выполняется обновление приложений Visual Basic 6.0, в которых используется неструктурированная обработка ошибок. (Можно сравнить номер ошибки с Свойство Number (объект Err).) Однако по возможности следует заменять такую систему управления ошибками на Обзор структурной обработки исключений в Visual Basic.

Заметки

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

Попытка применить функцию Rename к открытому файлу вызовет ошибку. Необходимо закрыть файл перед его переименованием. Аргументы Rename не могут содержать многозначные (*) и однозначные (?) подстановочные знаки.

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

Пример

В этом примере функция Rename используется для переименования файла. Предполагается, что все указанные в примере каталоги уже существуют.

Dim OldName, NewName As String
OldName = "OLDFILE"
' Define file names.
NewName = "NEWFILE"
' Rename file.
Rename(OldName, NewName)

OldName = "C:\OLDDIR\OLDFILE"
NewName = "C:\NEWDIR\NEWFILE"
' Move and rename file.
Rename(OldName, NewName)