Question

我正在尝试运行一个文件夹并检查访问日期，如果访问日期超过5天，我需要它移动到“test2”文件夹，我在运行时没有收到任何错误消息。下面是我到目前为止，有人能指出我正确的方向，我在Stack上找到的就是执行此操作的PowerShell脚本。

Set oFileSys = WScript.CreateObject("Scripting.FileSystemObject")


sRoot = "C:\test"                                                               
today = Date                                                                  
nMaxFileAge = 5                                                         

MoveFiles(sRoot)    


        Function MoveFiles(ByVal sFolder) 

            Set oFolder = oFileSys.GetFolder(sFolder)
            Set aFiles = oFolder.Files

            For Each file in aFiles
           FileAccessed = FormatDateTime(file.DateLastAccessed, "2")
                If DateDiff("d", FileAccessed, today) > nMaxFileAge Then
                    oFileSys.MoveFile sFolder, "C:\test2"
                End If
            Next

        End Function

Answer 1

不应该是oFileSys.MoveFile file, "C:\test2\"（你有sFolder而不是file）？

或者你可以在if块中file.move "C:\test2\"。

更新：您需要将\放在文件夹名称的末尾

让VBS移动文件

1 个答案: