VBScript, Bewegt sich die veränderten Dateien in einen anderen Ordner

Im Grunde, ich brauche ein Skript zum verschieben von Dateien in einen anderen Ordner, auf die zugegriffen wurde, und modifiziert.

Ich bin neu in der scripting -, so kann dies ein einfaches problem, aber ich bin ratlos. Hier ist der Fehler, die ich immer bin:

Skript: C:\Users\bmcwilliams\Desktop\pssitest.vbs

Line: 17

Char: 10

Fehlermeldung: Datei existiert bereits

Code: 800A003A

Quelle: Microsoft VBScript runtime error

Den Zielordner leer ist, so bin ich nicht sicher, was Los ist.

Unten ist der code, den ich habe. Es verändert den code in diesem Beitrag aufgelistet:

So verschieben Sie Dateien von einem Verzeichnis in ein anderes Verzeichnis basierend auf der Dateigröße

' use a default source path
dim sourcepath: sourcepath = "C:\users\bmcwilliams\Desktop\TestUncompleted"

' use a default destination path
dim destinationpath: destinationpath = "C:\users\bmcwilliams\Desktop\TestCompleted"

dim fso: set fso = CreateObject("Scripting.FileSystemObject")
dim sourcefolder: set sourcefolder = fso.GetFolder(sourcepath)

' loop through each file in the directory, compare size property against
' the limit and copy as appropriate
dim file, count: count = 0
for each file in sourcefolder.Files
    dim createDate: createDate = file.DateCreated
    dim modifyDate: modifyDate = file.DateLastModified
    if createDate <> modifyDate Then
         file.Move destinationpath
         count = count + 1
    end if
next

WScript.Echo("complete: " & count & " file(s) moved")

Irgendwelche Ideen? Jede Eingabe wird sehr geschätzt. Danke!

InformationsquelleAutor bmac423 | 2012-10-11

Schreibe einen Kommentar