chris123
Goto Top

Einen Ordner in mehrer Ordner gleichzeitig kopieren

Hi

Ich suche eine Möglichkeit, wie einen Ordner mit Unterordnern gleichzeitig in mehrer Ordner kopieren kann.
Ich habe die Ordner A, B, C (nur als Beispiel, in Wirklichkeit sind es ca. 200 Ordner) und in jeden dieser Ordner soll der Unterordner 2008 kopiert werden.

Gibt es da eine Möglichkeit oder ein Tool?

Vielen Dank für Eure Antworten.
Chris

Content-Key: 85876

Url: https://administrator.de/contentid/85876

Printed on: April 25, 2024 at 05:04 o'clock

Member: tacker
tacker Apr 18, 2008 at 15:12:20 (UTC)
Goto Top
salü

dies ist mit einem kleinen VBScript zu lösen! hier ein schneller vorschlag!

option explicit

dim folder
dim fso
dim source
dim target
dim subfolder

source = "C:\source"  ' Ordner, wo der zu kopierende 2008 Ordner drinliegt  
target = "C:\ordner"  ' Ordner, wo die 200 Unterordner liegen, in die der 2008 Ordner reinkopiert werden soll  
set fso = createobject("scripting.filesystemobject")  
set folder = fso.getfolder(target).subfolders

For each subfolder in folder
set fso = createobject("scripting.filesystemobject")  
fso.copyfolder source, subfolder
Next

set fso = Nothing
set folder = Nothing

einfach noch die zwei Variablen source und target anpassen!

Gruss tacker
Member: chris123
chris123 Apr 18, 2008 at 17:16:30 (UTC)
Goto Top
Vielen Dank für die Antwort

Ich habe das Skipt angepasst:

option explicit

dim folder
dim fso
dim source
dim target
dim subfolder

source = "G:\xyz"
target = "G:\musik\cds\A-Z"
set fso = createobject("scripting.filesystemobject")
set folder = fso.getfolder(target).subfolders

For each subfolder in ordner
set fso = createobject("scripting.filesystemobject")
fso.copyfolder source, subfolder
Next

set fso = Nothing
set folder = Nothing

Bekomme aber folgende Fehlermeldung:
Zeile: 14
Zeichen: 1
Fehler: Variable ist nicht definiert

Was muss ich noch ändern?
Member: tacker
tacker Apr 18, 2008 at 17:43:21 (UTC)
Goto Top
salü sorry hab im nachhinein noch was hineineditiert!

For each subfolder in ordner

diese codezeile abändern in ..

For each subfolder in folder

dann sollte es funzen!

gruss tacker
Member: bastla
bastla Apr 18, 2008 at 17:57:59 (UTC)
Goto Top
Hallo chris123!

Du könntest natürlich auch eine CMD-Shell öffnen und eingeben:
for /d %i in ("G:\musik\cds\A-Z\*.*") do @echo xcopy /e "G:\xyz" "%i\xyz\"  
Dann siehst Du (zum Testen) zunächst, was kopiert würde. Wenn Du das "@echo" entfernst, werden die Kopierbefehle tatsächlich ausgeführt.

Grüße
bastla
Member: chris123
chris123 Apr 18, 2008 at 18:15:33 (UTC)
Goto Top
Vielen Dank jetzt hat es geklappt
Auf Folder hätte ich auch kommen können.