Извлечь файл с помощью SevenZip

Question

Я пытаюсь добавить файл unzipper в свое приложение, поэтому я немного погуглил и наткнулся на библиотеку sevenzipsharp, которая может извлекать наиболее распространенные форматы архивов.

Поэтому я для тестирования создал простое приложение с формой Windows.

Таким образом, введенные данные являются местоположением файла C:\Users\jeee\Desktop\CriticalSubPrintout.rar и расположение выписки C:\Users\jeee\Desktop\Test Extract

Я добавил некоторый код, без какой-либо документации.. не моя сильная сторона, видимо..

Imports SevenZip

Public Class Archiver

    Private Sub btnExtractArchive_Click(sender As Object, e As EventArgs) Handles btnExtractArchive.Click

        Dim Extractor As New SevenZipExtractor(tbExtractFile.Text)
        Extractor.ExtractArchive(tbExtractPath.Text)

    End Sub

End Class

Это вызывает ошибку, когда я пытаюсь запустить код

Может кто-нибудь предоставить пример кода или ссылку на хороший пример, как использовать SevenZipSharp? Потому что я искал и не могу найти VB.NET образцы.

Или, может быть, просто помочь мне понять, что мне нужно делать.

Благодарю.

Answer 1

Вам нужно позвонить SevenZipBase.SetLibraryPath с путем к 7z.dll, и убедитесь, что вы используете правильную версию для вашего приложения (32- или 64-разрядная версия). например

SevenZipBase.SetLibraryPath("C:\Dev\7z.dll")
Dim Extractor As New SevenZipExtractor(tbExtractFile.Text)
Extractor.ExtractArchive(tbExtractPath.Text)