MoveFolder 方法

将一个或多个文件夹从某位置移动到另一位置。

object.MoveFolder source, destination

参数

object

必选项。应为 FileSystemObject 的名称。

source

必选项。要移动的文件夹的路径。source 参数字符串仅可在路径的最后一个组成部分中包含通配符。

destination

必选项。指定路径,表示要将文件夹移动到该目标位置。destination 参数不能包含通配符。

说明

如果 source 包含通配符或 destination 以路径分隔符 (\) 结束,则假定 destination 指定现有文件夹,将匹配文件移动到该文件夹中。否则,假定 destination 是要创建的目标文件夹。在任一种情况下,移动单个文件夹时,可能会发生以下三种情况:

  • 如果 destination 不存在,则移动文件夹。这是通常会发生的情况。
  • 如果 destination 是已经存在的文件,则会出现错误。
  • 如果 destination 是目录,则会出现错误。

如果 source 使用通配符,但没有匹配文件夹时,则会出现错误。MoveFolder 方法在遇到出现的第一个错误时停止。该方法不会撤消错误发生前所作的任何更改。

下面例子举例说明如何使用 MoveFolder 方法:

Sub MoveAFolder(Drivespec)  Dim fso  Set fso = CreateObject("Scripting.FileSystemObject")  fso.MoveFolder Drivespec, "c:\windows\desktop\"End Sub

要点  只有当操作系统支持时,此方法才允许在两个卷之间移动文件夹。

广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!