This sample shows how to add Unicode files into a ZIP archive.
Download ZipForge.NET | Learn More | All VB.NET samples
Imports System
' This namespace contains the main class - ZipForge.
' Don't forget to add a reference to the ZipForge
' assembly to your project references
Imports ComponentAce.Compression.ZipForge
' This namespace contains ArchiverException class
' required for error handling
Imports ComponentAce.Compression.Archiver
Module UnicodeFilenames
Sub Main()
' Create an instance of the ZipForge class
Dim archiver As ZipForge = New ZipForge()
Try
' Set the name of the archive file we want to create
archiver.FileName = "c:\test.zip"
' store Unicode file names
archiver.UnicodeFilenames = True
' create a new archive file
archiver.OpenArchive(System.IO.FileMode.Create)
' save a string into a file with unicode name
archiver.AddFromString(ChrW(&H0168).ToString() & ChrW(&H0173).ToString() & ChrW(&H01d3).ToString() & ChrW(&H01dc).ToString(), "text")
archiver.CloseArchive()
Catch ae As ArchiverException
Console.WriteLine("Message: {0} Error code: {1}", ae.Message, ae.ErrorCode)
' Wait for the key to be pressed
Console.ReadLine()
End Try
End Sub
End Module
Download ZipForge.NET | Learn More | All VB.NET samples |
|
|
Current version: 3.05
Released: June 12, 2014
Price: $ 299
|
|
I don't think I've ever had a better support experience in regard to any of the 3rd party tools we use.
Tim Stickley
|
|
|