(VB.NET UWP/WinRT) Zip -- Exclude Files Based on Wildcard Matching

Demonstrates how to use the SetExclusions method to exclude matching files from being added to a .zip.

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 zip As New Chilkat.Zip

Dim success As Boolean = zip.NewZip("qa_output/x.zip")


' Let's add files from the directory tree rooted at C:\AAWorkarea\ChilkatSampleProjects

' However.. we want to exclude all files ending in ".cache" or ".pdb" regardless of the sub-directory.
' Also exclude all files under any "obj" directory,
' and we also want to exclude any .exe found under a "win10-x64" directory.

Dim saExcludes As New Chilkat.StringArray
saExcludes.Append("*.cache")
saExcludes.Append("*.pdb")
saExcludes.Append("*/obj/*")
saExcludes.Append("*/win10-x64/*.exe")
zip.SetExclusions(saExcludes)

' Append promises of paths and files to be zipped.
Dim recurse As Boolean = True
success = Await zip.AppendFilesAsync("c:/AAWorkArea/ChilkatSampleProjects/*",recurse)
If (success = False) Then
    Debug.WriteLine(zip.LastErrorText)
    Exit Sub
End If


' Create the zip from the file and directory promises added previously.
success = Await zip.WriteZipAndCloseAsync()
If (success = False) Then
    Debug.WriteLine(zip.LastErrorText)
    Exit Sub
End If


Debug.WriteLine("Success.")