Ich habe das Problem, das ich den Fehler bekomme, dass der Pfad nicht gefunden wird.
Mein Code:
Vielen Dank im vorraus.
Mein Code:
VB.NET-Quellcode
-
- Using archive As ZipArchive = ZipFile.OpenRead(wpSaveZip)
- Dim maxEntries As Integer = archive.Entries.Count
- loader.SetMaximum(maxEntries)
- Dim currentEntry As Integer = 0
- For Each entry As ZipArchiveEntry In archive.Entries
- currentEntry += 1
- loader.Increase(1)
- loader.SetDescription("Decompiling Wordpress... (" & Math.Round(currentEntry / maxEntries * 100) & "%)")
- ' Gets the full path to ensure that relative segments are removed.
- Dim destinationPath As String = Path.GetFullPath(Path.Combine(wpSaveFolder, entry.FullName))
- ' Ordinal match is safest, case-sensitive volumes can be mounted within volumes that
- ' are case-insensitive.
- If destinationPath.StartsWith(wpSaveFolder, StringComparison.Ordinal) Then
- If Not My.Computer.FileSystem.DirectoryExists(Path.GetDirectoryName(destinationPath)) Then
- Directory.CreateDirectory(Path.GetDirectoryName(destinationPath))
- End If
- Application.DoEvents()
- Console.WriteLine("Currently decompiling to: " & destinationPath)
- entry.ExtractToFile(destinationPath, True) ' Hier ist der Fehler
- End If
- Next
- End Using
Vielen Dank im vorraus.