2016-11-03 1 views
0

Okay, ich finde eine andere Option, das ist einfacher. Ich möchte den Ordner im Ziel umbenennen, aber es funktioniert nicht.Ordner umbenennen mit Fehlern

Dim Log As String = System.IO.Path.Combine(DateTime.Now.ToString("yyyy_MM_dd_HHmmss")) 
    Process.Start("CMD", "/c robocopy.exe " & Source & " " & Destination & "/z /log:C:\Backup\log_" & Log & ".txt") 



    Dim Copy2 As String = ("Backup_" & DateTime.Now.ToString("yyyy_MM_dd_HHmmss")) 
    My.Computer.FileSystem.RenameDirectory(Destination, Copy2) 
    Process.Start(Copy2) 'öffnet explorer 
    MsgBox("Backup ist vollendet!") 
+0

Sind Sie fragen tatsächlich, wie ein Wert einer Variablen zugewiesen werden? – GSerg

+2

[Grundsätzlich ein weniger gut gestellt Duplikat] (http://stackoverflow.com/q/40345211) – Plutonix

+0

Fragen Sie, wie Sie das letzte '\' in einer Zeichenfolge finden und die Zeichenfolge dort abschneiden? – doctorlove

Antwort

0

Ist das, was Sie nach:

Dim backupDirectory As String = "C:\Backup\Here" 

Dim di As DirectoryInfo = Directory.GetParent(backupDirectory) 

Debug.Write(di.FullName) 

'Output: 
'C:\Backup 
+0

Bitte sehen Sie meine Antwort – bigMre

+1

Bitte beraten Sie nicht nach wörtlichen Backslashes suchen. Man muss relevante Klassen von 'System.IO' und' System.IO.Path' verwenden. – GSerg

1

Tricky eins! Versuchen Sie folgendes:

Destination = "C:\backup" 
+0

das ist die Sache, ich muss die letzte entfernen mögen Ordner außerhalb der Zielvariablen. Also diese dosnt arbeiten – bigMre

+1

@ bigMre Aber das ist nicht, was Sie gefragt haben. 'edit a varaible' sagt nichts über das Parsen und Entfernen von Elementen aus einem Pfad. – Plutonix

+0

Bitte sehen Sie meine Antwort – bigMre