Create a Zip File

Download Chilkat .NET for 2.0 / 3.5 Framework

Download Chilkat .NET for 1.0 / 1.1 Framework

How to create a Zip archive in Visual Basic .NET

    ' Simple example to create a Zip file in VB.NET
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.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")

        ' Append a directory tree.  This simply adds disk file references
        ' to the Zip object.  No Zip is created at this point.
        Dim success As Boolean
        success = zip.AppendFiles("tree", True)
        If (Not success) Then
            MsgBox(zip.LastErrorText)
            Exit Sub
        End If

        ' Write test.zip
        success = zip.WriteZipAndClose()
        If (Not success) Then
            MsgBox(zip.LastErrorText)
        Else
            MsgBox("Zip created!")
        End If

    End Sub

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