Schmidij
Ensign
- Registriert
- Feb. 2011
- Beiträge
- 152
Hallo zusammen.
Ich muss ein VBScript erarbeiten, welches alle Dateien in einem Ordner (Datein/Files & Unterordner) in ein anderes Verzeichnis kopiert und diese dort, fals schon vorhanden, ersetzt.
so sieht zur Zeit mein Script aus.
Doch im Verzeichnis "C:\Qulle\" ist eine .txt (1.txt) und ein Ordner, welcher auch eine .txt (2.txt) behinhaltet vorhanden.
Wird das Script ausgeführt, wird nur die 1.txt verschoben.
Kann mir jemand Helfen ?
Besten Dank schon jetzt !
Ich muss ein VBScript erarbeiten, welches alle Dateien in einem Ordner (Datein/Files & Unterordner) in ein anderes Verzeichnis kopiert und diese dort, fals schon vorhanden, ersetzt.
Code:
'Script verschiebt alle Dateien von str_source nach str_dest
Dim fso, folder
str_source = "C:\qulle\"
str_dest = "C:\ziel\"
Set fso = CreateObject("scripting.FileSystemObject")
Set folder=fso.GetFolder(str_source)
for each file in folder.Files
fso.CopyFile file.Path, str_dest, true
next
so sieht zur Zeit mein Script aus.
Doch im Verzeichnis "C:\Qulle\" ist eine .txt (1.txt) und ein Ordner, welcher auch eine .txt (2.txt) behinhaltet vorhanden.
Wird das Script ausgeführt, wird nur die 1.txt verschoben.
Kann mir jemand Helfen ?
Besten Dank schon jetzt !