Hallöchen,
hatte jetzt eine länger VB Pause und wollte jetzt mal wieder was machen.
Frage:
Ich versuche alle Unterordner in einem Ordner zu verschieben (von Local auf Server). Relativ trivial dachte ich...nun bin ich soweit, dass alles verschoben wird, nur leider auch das Stammverzeichnis in dem gesucht wird.
Kann ich das verhindern? Aktuell lass ich das Verzeichnis einfach neu erstellen, dachte aber es geht doch bestimmt auch anders.
PS: Nicht wundern wegen der Verzeichnis Angabe, ich ändere damit eine Zeile in einer .ini Datei.
Freue mich über eine Rückmeldung.
Spoiler anzeigen
hatte jetzt eine länger VB Pause und wollte jetzt mal wieder was machen.
Frage:
Ich versuche alle Unterordner in einem Ordner zu verschieben (von Local auf Server). Relativ trivial dachte ich...nun bin ich soweit, dass alles verschoben wird, nur leider auch das Stammverzeichnis in dem gesucht wird.
Kann ich das verhindern? Aktuell lass ich das Verzeichnis einfach neu erstellen, dachte aber es geht doch bestimmt auch anders.
PS: Nicht wundern wegen der Verzeichnis Angabe, ich ändere damit eine Zeile in einer .ini Datei.
Freue mich über eine Rückmeldung.
VB.NET-Quellcode
- Dim PathExtern As String = "CUSTOMERS=.\customers"
- Dim PathIntern As String = "CUSTOMERS=\\myshoes\customers"
- Dim PathMoveFolders As String = "C:/myshoes/"
- Dim s As String = Strings.Split(PathIntern, "="c)(1) & "\"
- Dim p As String = Path.Combine(PathMoveFolders, "customers/")
- For Each fo As String In Directory.GetDirectories(PathMoveFolders, "*", SearchOption.TopDirectoryOnly)
- My.Computer.FileSystem.MoveDirectory(fo, s)
- IO.Directory.CreateDirectory(p)
- Next fo