Zip-Datei entpacken

PhoenixBlaster · 4. Januar 2014, 15:56

Hi

Ich wollte eine Zip-Datei mit VB entpacken und habe die "Ionic.ZLib" gefunden und dazu diesen Code:

VB.NET-Quellcode

Imports Ionic.Zip
Public Class Form1
Dim ZipToUnpack As String
Dim Ordnerpfad As String
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
TextBox1.Text = OpenFileDialog1.FileName
ZipToUnpack = TextBox1.Text
End If
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Ordnerpfad = SaveFileDialog1.FileName
End If
Using zip As ZipFile = ZipFile.Read(TextBox1.Text)
AddHandler zip.ExtractProgress, AddressOf MyextractProgress
Dim Entry As ZipEntry
For Each Entry In zip
Entry.Extract(Ordnerpfad, ExtractExistingFileAction.OverwriteSilently)
Next
End Using
End Sub
Private Sub MyextractProgress(sender As Object, e As ExtractProgressEventArgs)
If e.BytesTransferred > 0 AndAlso e.TotalBytesToTransfer > 0 Then
Me.Invoke(Sub() ProgressBar1.Value = CInt(e.BytesTransferred * 100 \ e.TotalBytesToTransfer))
End If
End Sub
End Class

Mein Problem ist nur das ich diese Fehler bekomm:
1) Der Typ "ZipFile" ist nicht definiert.
2) Der Typ "ExtractedProgessEventArgs" ist nicht definiert.

MFG
PhoenixBlaster

ThuCommix · 4. Januar 2014, 15:59

Hast du die Möglichkeit .net 4.5 zu nutzen? - Dort gibt es bereits Methoden zum entpacken von Zip-Dateien. Andernfalls, gescheckt ob du die nötigen Imports hast?

PhoenixBlaster · 4. Januar 2014, 16:02

gescheckt ob du die nötigen Imports hast?

wie geht das. Ich habe hier im Forum auch einen Code gefunden aber das stand "Import Shell32" gibt's nicht. Welcher Import fehlt denn um "ZipFile" zu benutzen?

Trade · 4. Januar 2014, 16:03

microsoft.com/germany/msdn/akt…008dasentwicklerbuch.aspx

Schau dir halt die Referenz an.

MVN050 · 4. Januar 2014, 16:05

ich benutze dafür garkeine lib?
eine zip datei entpacken kann man von windoof aus auch so ohne hilfe (aber keine rar)

ich baller dir jetzt einfach mal meine version an den kopf die ich zum updaten benutze

Spoiler anzeigen

VB.NET-Quellcode

Dim sc As New Shell32.Shell()
''UPDATE !!
Dim startBuffer() As Byte = {80, 75, 5, 6, 0, 0, 0, 0, 0, 0, 0, _
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
Dim downloadclient_launcher As WebClient = New WebClient()
downloadclient_launcher.Proxy = Nothing
downloadclient_launcher.DownloadFile("http://mindora-arts.de/arts/sgn/client/sgn.zip", IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) & "\sgn.zip")
' My.Computer.Network.DownloadFile("http://mindora-arts.de/arts/sgn/client/sgn.zip", IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) & "\sgn.zip", "", "", True, 10000000, True)
'Create directory in which you will unzip your files .
' IO.Directory.CreateDirectory(Label2.Text & "\Mindora-Arts\SGN")
'Declare the folder where the files will be extracted
Dim output As Shell32.Folder = sc.NameSpace(sgnpath)
'Declare your input zip file as folder .
Dim input As Shell32.Folder = sc.NameSpace(IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) & "\sgn.zip")
'Extract the files from the zip file using the CopyHere command .
' output.CopyHere(input.Items, 4)
output.CopyHere(input.Items, (16))
ChDir(sgnpath)
'Process.Start("launcher\games\minigames\Stalked\Stalked.exe")
Process.Start(sgnpath & "/specialg-net.exe")
ChDir((IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location)))
Application.Exit()

PhoenixBlaster · 4. Januar 2014, 16:05

Schau dir halt die Referenz an.

versteh ich jetzt nicht

@MVN050
Da ist wieder mein Programm das ich Shell32 irgendwie nich hab

Trade · 4. Januar 2014, 16:06

Du findest überall eine Documentation und auch im Source (ist ja OpenSource) ein Beispielprojekt.
dotnetzip.codeplex.com/documentation

Notfalls Google fragen, da findest du immer was.

ThuCommix · 4. Januar 2014, 16:09

@MVN050: Seit langem mal wieder der ranzigste Code der hier gepostet wurde, gratuliere dazu. Die Dll hast du aber schon eingebunden oder? - Weil dann funktioniert bei mir alles.

MVN050 · 4. Januar 2014, 16:11

@ThuCommix
den code hab ich selber von hier

welche dll meinst du?

ThuCommix · 4. Januar 2014, 16:12

Die Ionic.dll wenn er die nicht eingebunden, kann er logischerweise auch ZipFile nicht finden

PhoenixBlaster · 4. Januar 2014, 16:17

Die Dll hast du aber schon eingebunden oder?

Natürlich hab ich die eingebunden so schlau bin ich auch!

Aber mir ist grad aufgefallen das die dll: Ionic nur diese Namespaces hat: "ZLib" und "Crc" im Code steht aber ich muss den Namespace "Zip" von "Ionic" importieren.

ThuCommix · 4. Januar 2014, 16:21

Was sagt den dein Visual Studio dazu wenn die mit der Maus über ZipFile hoverst?

MVN050 · 4. Januar 2014, 16:25

@PhoenixBlaster
Imports Ionic.Zip
ähm? du müsstest nicht die zip datei imorrieren sondern du musst die datei entpacken und die xxx.dll importieren

so wird das bei dir nix

meine methode ist dafür gedacht das du keine .dll mitliefern musst (aber der code ist einer der schlechtesten überhaupt!)
bei deiner methode musst du deine xxx.dll mitliefern was oft viele nicht wollen

ThuCommix · 4. Januar 2014, 16:26

Natürlich könnte man wie oben erwähnt auch einfach das Framework 4.5 nutzen, da müsste man sich keine Sorgen machen und einfach das nutzen.

PhoenixBlaster · 4. Januar 2014, 16:29

Was sagt den dein Visual Studio dazu wenn die mit der Maus über ZipFile hoverst?

Spoiler anzeigen

Trade · 4. Januar 2014, 16:30

Du hast keinen Verweis gesetzt. Sonst wäre der Import nicht grün.

ThuCommix · 4. Januar 2014, 16:31

Soviel zum Thema, ich habe die dll eingebunden..

PhoenixBlaster · 4. Januar 2014, 16:34

@Trade;
Doch ich hab den Verweis gemacht

Der Beweis (Bildupdate)

MVN050 · 4. Januar 2014, 16:41

@PhoenixBlaster

MVN050 schrieb:

@PhoenixBlaster
Imports Ionic.Zip
ähm? du müsstest nicht die zip datei imorrieren sondern du musst die datei entpacken und die xxx.dll importieren

so wird das bei dir nix
meine methode ist dafür gedacht das du keine .dll mitliefern musst (aber der code ist einer der schlechtesten überhaupt!)
bei deiner methode musst du deine xxx.dll mitliefern was oft viele nicht wollen

PhoenixBlaster · 4. Januar 2014, 16:46

@MVN050
Und wie meinst du wie ich das machen sollte (Beispielcode?)

Zip-Datei entpacken

Zip-Datei entpacken

VB.NET-Quellcode

VB.NET-Quellcode

MVN050 schrieb:

Tags

Ähnliche Themen

5 Benutzer haben hier geschrieben