VBS：重命名文件并将其移动到子文件夹

Question

通过将文件夹中的文件重命名并移动到某些子文件夹来解决一些问题。

文件具有以下名称结构   WATERFALLS = Mills Creek.jpg 或 ANIMALS = Timber Wolfes.jpg 如何将这两个文件移动到名为的两个（新）子文件夹 通过将文件重命名为新名称（等号后面），如Mills Creek.jpg和 Timber Wolfes.jpg ， WATERFALLS 和 ANIMALS 。 也许协议文件也可能写成。

我对VBS很新，我喜欢有解决方案。

非常感谢提前

随着周日的问候

麦克

Answer 1

使用docs开始您的研究。

使用Split()将文件名拆分为文件夹和文件名部分：

>> s = "WATERFALLS=Mills Creek.jpg"
>> a = Split(s, "=")
>> WScript.Echo a(0)
>> WScript.Echo a(1)
>>
WATERFALLS
Mills Creek.jpg

要访问/操作文件系统的元素，请使用FileSystemObject的方法。要获取源文件夹中的文件列表，请使用文件夹对象的.Files集合（参见here）。您的任务 - 检查是否存在文件夹/文件，创建文件夹，移动文件 - 可以使用适当命名的方法完成：.FolderExists，.FileExists，.CreateFolder和.MoveFile。