将修改后的文件移动到另一个文件夹的VBScript

基本上，我需要一个脚本将文件移动到另一个已被访问和修改的文件夹

我不熟悉脚本编写，所以这可能是一个简单的问题，但我被难住了。下面是我得到的错误：

脚本：C:\Users\bmcwillams\Desktop\pssitest.vbs 第17行 字符：10 错误：文件已存在 代码：800A003A 来源：Microsoft VBScript运行时错误

目标文件夹为空，因此我不确定发生了什么

下面是我的代码。它是根据本文中列出的代码修改的：

使用默认源路径 dim sourcepath:sourcepath=“C:\users\bmcwillams\Desktop\TestUncompleted” '使用默认目标路径 dim destinationpath:destinationpath=“C:\users\bmcwilliams\Desktop\TestCompleted” dim fso:set fso=CreateObject（“Scripting.FileSystemObject”） dim sourcefolder:set sourcefolder=fso.GetFolder（sourcepath） '循环遍历目录中的每个文件，将大小属性与 “限制并酌情复制 dim文件，计数：计数=0 对于sourcefolder.Files中的每个文件 dim createDate:createDate=file.DateCreated dim modifyDate:modifyDate=file.DateLastModified 如果createDate修改日期，则 文件。移动目标路径 计数=计数+1 如果结束 下一个 Echo（“已完成：&count&”文件已移动”）

---

有什么想法吗？非常感谢您的任何意见。谢谢

您正在复制到新位置，但未提供文件的新名称。要解决此问题，请将\和文件名附加到目标路径

file.Move destinationpath +"\" + file.name

---

您正在复制到新位置，但未提供文件的新名称。要解决此问题，请将\和文件名附加到目标路径

file.Move destinationpath +"\" + file.name

---

如果用于移动文件的目标路径是文件夹，而不是完整路径（包括目标文件名），则其尾部必须有反斜杠：

destinationpath = "C:\users\bmcwilliams\Desktop\TestCompleted\"

---

否则，

移动

操作将检测到目标（文件夹）已存在，因此将失败。

如果移动文件的目标路径是文件夹而不是完整路径（包括目标文件名），则必须有一个尾随反斜杠：

destinationpath = "C:\users\bmcwilliams\Desktop\TestCompleted\"

否则，

Move

操作将检测到目标（文件夹）已存在，因此将失败