Najut... mal ♪ take-on-me ♫ Spaß beiseite
Ich würde das so angehen:
1) Liste der zu kopierenden Dateien erstellen - mit kompletter Pfadangabe (absolut).
Man hätte also eine Liste mit Einträgen wie
z.B. "C:\LocalUserFolder\Projects\SERIALNUMBER\folder\subfolder\filename.ext"
2) absolute Pfadangabe in relative umwandeln (den Teil des Projektpfades wegschneiden)
Mit lokalem Projektverzeichnis "C:\LocalUserFolder\Projects\"
wird aus den Einträgen (s. Beispiel oben) demnach: "\SERIALNUMBER\folder\subfolder\filename.ext"
3) die nun relative Pfadangabe wird nun der Pfad für den Zielort vorangestellt.
Mit Zielverzeichnis "\\servername\project_folder\"
wird aus den Einträgen (s. Beispiel oben) demnach:
"\\servername\project_folder\SERIALNUMBER\folder\subfolder\filename.ext"
With New FileSystemObject
Debug.Print .BuildPath("\\servername\project_folder\", "\SERIALNUMBER\folder\subfolder\filename.ext")
End With
ergibt: "\\servername\project_folder\SERIALNUMBER\folder\subfolder\filename.ext"
4) Hilfsfunktion schreiben, die diese Angabe in seine einzelnen Pfadebenen zerlegt und der Reihe nach prüft ob diese Ebene existiert oder erst erstellt werden muss.
...
5) Datei ins Ziel kopieren.
...
6) Profit.
|