VBscript将文件从一个目录移动到另一个目录

dwe*_*les 5 vbscript

我是 VBscript 新手,希望获得有关将特定数量的文件从一个目录移动到另一个目录的帮助。

现在,我目前有一组具有不同扩展名的 3 个文件(用于测试目的),并且如果源目录中恰好有 3 个文件(不多也不少),则希望移动所有文件。到目前为止我的代码是:

Set fso=CreateObject("Scripting.FileSystemObject")

Set fldr=fso.getFolder("C:\folderA")
for each file in fldr.files
    If fldr.files < 3 then
            msgbox("Need more files")
    Else
            fso.MoveFile "C:\folderA\*", "C:\folderB"
    End If
Run Code Online (Sandbox Code Playgroud)

任何帮助将不胜感激。感谢大家!

Ekk*_*ner 3

  1. 用于fso.getFolder("C:\folderA").Files.Count获取 中的文件数C:\folderA
  2. 在文件循环之前(而不是在循环中)执行此操作(以移动它们)
  3. 如果该文件夹恰好包含 3 个文件,请考虑移动(并重新创建)该文件夹