Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
Create and Open In-Memory Zip
VB.NET Code to Create and Open In-Memory Zip ' Create and open Zip files in-memory. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 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 zip.NewZip("test.zip") ' Generate some data for Zipping. Dim s As String Dim i As Integer For i = 1 To 10 s = s + "This is a test " + Str(i) + vbCrLf Next ' Append the string to the in-memory Zip. Dim dataBytes() As Byte dataBytes = System.Text.Encoding.ASCII.GetBytes(s.ToCharArray) zip.AppendData("data.txt", dataBytes) ' Write the Zip to memory. Dim zipImage() As Byte zipImage = zip.WriteToMemory() ' Open the in-memory Zip Dim zip2 As New Chilkat.Zip() Dim success As Boolean success = zip2.OpenFromMemory(zipImage) If (Not success) Then MsgBox(zip2.LastErrorText) Exit Sub End If ' Get the first entry. Dim entry As Chilkat.ZipEntry entry = zip2.GetEntryByIndex(0) ' Inflate the entry's data. MsgBox(entry.InflateToString2()) End Sub Important: The download for this
example does not contain the ChilkatDotNet.dll which |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.