![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java JavaScript Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(VB.NET) Find a ZIP Entry by Exact Path Using EntryOfSee more Zip Examples This example demonstrates how to use the Unlike This method is useful when:
Suppose the ZIP archive contains: ZIP archives may optionally contain explicit directory entries such as The example:
Note: This example requires Chilkat v11.0.0 or greater.
Dim success As Boolean = False ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. success = False ' Open an existing ZIP archive. Dim zip As New Chilkat.Zip success = zip.OpenZip("example.zip") If (success = False) Then Debug.WriteLine(zip.LastErrorText) Exit Sub End If Dim entry As New Chilkat.ZipEntry ' ------------------------------------------------------------ ' Find a specific file entry by its exact ZIP path. success = zip.EntryOf("docs/readme.txt",entry) If (success = True) Then Debug.WriteLine("Found file entry:") Debug.WriteLine(" FileName = " & entry.FileName) Debug.WriteLine(" IsDirectory = " & entry.IsDirectory) Debug.WriteLine("") End If ' ------------------------------------------------------------ ' Find a directory entry. ' ' ZIP archives may optionally contain explicit directory entries. ' In this example, "docs/" is a separate directory entry. success = zip.EntryOf("docs/",entry) If (success = True) Then Debug.WriteLine("Found directory entry:") Debug.WriteLine(" FileName = " & entry.FileName) Debug.WriteLine(" IsDirectory = " & entry.IsDirectory) Debug.WriteLine("") End If ' ------------------------------------------------------------ ' Attempt to find a non-existent entry. success = zip.EntryOf("images/missing.png",entry) If (success = False) Then Debug.WriteLine("The entry images/missing.png was not found.") End If zip.CloseZip() Debug.WriteLine("Done.") |
||||
© 2000-2026 Chilkat Software, Inc. All Rights Reserved.