Descomprimir ZIP

Amigo prueba con esto

Download VB.NET Project Files and Source Code

Dim zip As New Chilkat.Zip()

' Anything begins the 30-day trial
Dim unlocked As Boolean
unlocked = zip.UnlockComponent("30-day trial")
If (Not unlocked) Then
MsgBox(zip.LastErrorText)
Exit Sub
End If

Dim success As Boolean
success = zip.OpenZip("test.zip")

' Unzip creating a new subdirectory named "tree"
' under the current working directory.
Dim count As Integer
count = zip.Unzip("tree")
If (count = -1) Then
MsgBox(zip.LastErrorText)
Else
MsgBox("Unzipped " + Str(count) + " files and directories")
End If

End Sub

Para mayoe informacion visita este link:
http://www.example-code.com/vbdotnet/zip.asp




Important: The download for this example does not contain the
ChilkatDotNet.dll which
must be downloaded and installed separately at
http://www.chilkatsoft.com/downloads.asp.
Once installed, add a reference to the DLL in the project by following the
instructions at
http://www.example-code.com/vbdotnet/step2.asp





Saludos cordiales,
Ángel Ruiz
MCTS .NET Framework 2.0 Windows Applications
Caracas - Venezuela
"El conocimiento es un bien, que crece a medida que se comparte"


"jessi" escribió en el mensaje
news:

Buenas!!!

¿Como puedo descomprimir .ZIP's en VB.NET?

Gracias