Zip Compress XML Sub-Trees

Download VB.NET Project Files and Source Code

VB.NET sample code showing how to Zip compress sub-trees within an XML document.

    ' Zip the contents of each company record.
    Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click

        Dim xml As New Chilkat.Xml()
        xml.LoadXmlFile("companies.xml")

        Dim b As Boolean
        b = xml.FirstChild2()
        While (b)
            ' Save the company name as an attribute.
            xml.AddAttribute("name", xml.GetChildContent("name"))

            ' Zip the sub-tree.
            xml.ZipTree()

            b = xml.NextSibling2()
        End While

        xml.GetRoot2()
        xml.SaveXml("zipped.xml")

    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