Rename 函数

项目
08/18/2008

更新：2007 年 11 月

重命名磁盘文件或目录。

在文件 I/O 操作中，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)