G
Giuseppe
I'm write a code with SharpZipLib for Zip files in MemoryStream...
I don't succeed to make Unzip....
This my code for Zip :
Private function ZipFiles(Files() as string) as MemoryStream
Dim StrFile As String
Dim ms As MemoryStream = New System.IO.MemoryStream
Dim s As ZipOutputStream = New ZipOutputStream(ms)
s.SetLevel(5)
For Each StrFile In Files
Dim fileName As String = StrFile
Dim fs As FileStream = File.OpenRead(fileName)
Dim buffer() As Byte = New Byte(fs.Length) {}
fs.Read(buffer, 0, buffer.Length)
Dim entry As ZipEntry = New ZipEntry(fileName)
s.PutNextEntry(entry)
s.Write(buffer, 0, buffer.Length)
Next
s.Finish()
Return ms
I don't succeed to make Unzip....
This my code for Zip :
Private function ZipFiles(Files() as string) as MemoryStream
Dim StrFile As String
Dim ms As MemoryStream = New System.IO.MemoryStream
Dim s As ZipOutputStream = New ZipOutputStream(ms)
s.SetLevel(5)
For Each StrFile In Files
Dim fileName As String = StrFile
Dim fs As FileStream = File.OpenRead(fileName)
Dim buffer() As Byte = New Byte(fs.Length) {}
fs.Read(buffer, 0, buffer.Length)
Dim entry As ZipEntry = New ZipEntry(fileName)
s.PutNextEntry(entry)
s.Write(buffer, 0, buffer.Length)
Next
s.Finish()
Return ms