cercando sul forum ho trovato un codice ....di decompressione per sharpziplib...che io ho inserito in un form...
Imports ICSharpCode.SharpZipLib.Zip
Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim s As New ZipInputStream(File.OpenRead("c:\ciao.zip"))
Dim theEntry As ZipEntry
Dim mycontrol As Boolean
mycontrol = True
'//ciclo fino a quando non trovo una entry
theEntry = s.GetNextEntry()
While Not theEntry Is Nothing
'//nel caso non esista una entry successiva esco dal ciclo
If (theEntry Is Nothing) Then
mycontrol = False
Exit While
End If
Console.WriteLine(theEntry.Name)
Dim directoryName As String = Path.GetDirectoryName(theEntry.Name)
Dim fileName As String = Path.GetFileName(theEntry.Name)
' create directory
Directory.CreateDirectory("c:\ciao")
If fileName <> [String].Empty Then
Dim streamWriter As FileStream = File.Create(theEntry.Name)
Dim size As Integer = 2048
Dim data(2048) As Byte
While True
size = s.Read(data, 0, data.Length)
If size > 0 Then
streamWriter.Write(data, 0, size)
Else
Exit While
End If
End While
streamWriter.Close()
End If
theEntry = s.GetNextEntry()
End While
s.Close()
End Sub
End Class
solo che questo codice non va...mi fa apparire solamente una cartella vuota...senza il file che ho richiesto...sapete dirmi dov'è l'errore....io ero riuscito a creare il codice di compressione...ma quello di decompressione non riesco proprio a racapezzarmi...aiutatemi please...
Rispondi quotando
