B4J Library [b4j] zip/unzip

pd_ZipUnZip Library v2.0

'    zip files/directories
    Dim File1 As String = File.Combine(File.DirApp,"1.txt")
    Dim File2 As String = File.Combine(File.DirApp,"2.txt")
    Dim folder1 As String = File.DirApp&"\testfolder"
 
    Dim targetFile As String = File.Combine(File.DirApp,"test1.zip")
   
    setOptions
   
    Dim success As Boolean = zp.Zip(Array(File1,File2,folder1),targetFile)
    Log("success : "&success)

Sub setOptions
    'optional
    zp.CompressionLevel = 1
    zp.PasswordEnabled = True
    zp.Password = "12345"
End Sub

Spoiler: All Methods

// Properties

void setPasswordEnabled(boolean value)
boolean getPasswordEnabled()
void setPassword(String value)
String getPassword()
void setCompressionLevel(int value)
int getCompressionLevel()

// ZIP Operations
boolean Zip(anywheresoftware.b4a.objects.collections.List items, String zipFile)
boolean Unzip(String zipFile, String destinationDirectory)
boolean Add(String zipFile, String source, String entryName)
boolean Remove(String zipFile, String entryName)


// Extraction Operations
boolean Extract(String zipFile, String entryName, String destinationDirectory)
boolean ExtractFiles(String zipFile, anywheresoftware.b4a.objects.collections.List entries, String destinationDirectory)


// Archive Information
anywheresoftware.b4a.objects.collections.List GetFiles(String zipFile)
anywheresoftware.b4a.objects.collections.List GetEntries(String zipFile)
int GetEntryCount(String zipFile)
long GetSize(String zipFile)

// Password Operations
boolean IsPasswordProtected(String zipFile)
boolean IsPasswordCorrect(String zipFile)


// Validation and Integrity
boolean IsValid(String zipFile)
boolean TestIntegrity(String zipFile)

 

[behnam_tr]

added v2.0 with passward protect support for zip/unzip