(VB.NET UWP/WinRT) Create a Zip Entirely in Memory

Demonstrates how to create a .zip from in-memory byte data and strings, and to write the .zip to an in-memory image.

Chilkat Universal Windows Platform (UWP) / WinRT Downloads Chilkat for the Universal Windows Platform (UWP)

' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim crypt As New Chilkat.Crypt2
Dim zip As New Chilkat.Zip

Dim success As Boolean = zip.NewZip("test.zip")
If (success <> True) Then
    Debug.WriteLine(zip.LastErrorText)
    Exit Sub
End If


' Add the bytes 0x00 0x01 0x02 0x03 ... 0x0F as a file in the .zip
Dim binFileData() As Byte
binFileData = crypt.Decode("000102030405060708090A0B0C0D0E0F","hex")
Dim entry As Chilkat.ZipEntry = zip.AppendData("binaryData.dat",binFileData)


' Add the string "Hello World!" to the .zip
entry = zip.AppendString2("helloWorld.txt","Hello World!","utf-8")


Dim zipFileInMemory() As Byte
zipFileInMemory = Await zip.WriteToMemoryAsync()

' We could save these files to a file, and it is a valid .zip
Dim fac As New Chilkat.FileAccess
success = fac.WriteEntireFile("test.zip",zipFileInMemory)
If (success <> True) Then
    Debug.WriteLine(fac.LastErrorText)
    Exit Sub
End If


Debug.WriteLine("Zip Created!")