IB Zip-DLL 3.0 - Zippen einfach gemacht In Kürze erscheint die neue Version 3.0 der IB Zip-DLL Komponente. Mit dieser Komponente aus dem Hause "Ingo Bordasch" wird das Erstellen und Entpacken von ZIP-Archiven zum Kinderspiel. Auch selbstextrahierende EXE-Dateien lassen sich erstellen.01.12.01Ein Bericht von Dieter Otter Zippen, Entpacken, Selfextracting EXE ... 32-Bit DLL (keine ActiveX-DLL)... Einsatz in Delphi, C++ und VB ... verschiedene Kompressionsraten ... Unterstützung von Passwörtern ... Erstellen von selfextracting Files IB Zip-DLL ist eine DLL-Entwicklerkomponente, mit der Sie auf sehr einfache Weise ZIP-Funktionen in Ihren selbsterstellten Programmen integrieren. Und eine automatische Entpack-Funktion eines ZIP-Files ist z.B. immer dann interessant, wenn Sie Ihre Anwendung mit einer Online-Update Funktion ausgestattet haben und die neuen Dateien gezippt vom FTP-Server geladen werden. Wäre doch schön, wenn dann auch die Update-Dateien gleich aus Ihrer Anwendung heraus entpackt werden könnten, oder nicht? Sicherlich gibt es hier noch viele weitere Beispiele - das soll aber nicht Thema dieser Toolbesprechung sein. Ich habe es mir zur Aufgabe gemacht, die Zip-DLL Komponente von Ingo Bordasch einmal genauer unter die Lupe zu nehmen. Und da im Installationsumfang kein Demo-Projekt für Visual Basic vorhanden war, musste ich also zunächst selbst ein kleines Beispiels-Projekt proggen, um die Funktionalität der Zip-DLL auch testen und beurteilen zu können. Aber das war nicht weiter tragisch - im Gegenteil es hat sogar Spass gemacht Installation der IB Zip-DLL 3.0 Komponente Handhabung Funktionen
Zip-Funktionen Un(G)Zip-Funktionen Verschlüsselungsfunktionen Zusätzliche Funktionen Verwenden der Zip-DLL in Visual Basic Nachdem man die Funktions-Deklarationen aus der Online-Hilfe in sein Projekt übertragen hat, kann es losgehen. Erstellen eines Zip-Archivs Dim lResult As Long ' 1. Der DLL mitteilen, wie das Archiv heissen soll IB_ZipArchiveFile "MeinZipArchiv.zip" ' 2. Welche Dateien sollen komprimiert werden? ' WICHTIG! Die erste Datei muss per IB_ZipFileSpec angegeben werden! IB_ZipFileSpec "c:\temp\datei1.exe" ' Alle weiteren Dateien dann per IB_ZipAddFileSpec angeben! IB_ZipAddFileSpec "c:\temp\datei2.exe" IB_ZipAddFileSpec "c:\temp\datei3.exe" ' Und oder Alternativ: Dateimaske verwenden IB_ZipAddFileSpec "c:\temp\daten\*.*" ' 3. Passwort (falls gewünscht) IB_ZipPassword "geheim" ' 4. Kompressionsrate einstellen: 1=normal IB_ZipCompressType 1 ' 5. ZIP-Archiv erstellen (1=mit Fortschrittsanzeige) lResult = IB_Zip(1) ' 6. Rückgabewert auswerten If lResult = -2 Then MsgBox "Der Komprimiervorgang wurde durch den Benutzer abgebrochen" ElseIf lResult > 0 Then MsgBox CStr(lResult) Dateien komprimiert!" Else MsgBox "Es ist ein Fehler aufgetreten!" End If Die auf diese Weise erzeugten ZIP-Archive sind kompatible zu WinZip und allen anderen Programmen, die das PKZIP-Verfahren nach Indusrie-Standard unterstützen. SFX - selfextracting EXE erstellen Dim lResult As Long lResult = IB_SFX("ib-zip.dll", "MeinZipArchiv.zip", "MeinZipExe.exe" Ruft man nun die ersteltle EXE-Datei auf, erscheint ein Dialog zum Festlegen eines Ziel-Ordner, in welchem die Dateien dann entpackt werden. Zip-Archiv entpacken Dim lCount As Long ' 1. ZIP-Archiv festlegen IB_UnZipArchiveFile "MeinZipArchiv.zip" ' 2. Dateien, die entpackt werden sollen IB_UnZipFileSpec "*.*" ' 3. vorhandene Unterverzeichnisse berücksichtigen IB_UnZipUseStoredDirs 1 ' 4. Ziel-Ordner festlegen IB_UnZipExtractDir "d:\test" ' 5. Dateien überschreiben? (2=Dialog zeigen) IB_Overwrite 2 ' 6. Dateien entpacken (1 = mit ProgressBar) lCount = IB_UnZip(1) ' 7. Rückgabewert auswerten If lCount = -1 Then MsgBox "Das ZIP-Archiv existiert nicht!" ElseIf lCount = - 2 Then MsgBox "Benutzerabbruch während des Entpackens!" Else MsgBox CStr(lCount) & " von " & _ IB_ZipCount(txtZIPArchiv.Text) & " Dateien entpackt!" End If Gesamteindruck Die IB Zip-DLL Komponente überzeugt durch ihre einfache Handhabung und vor allem durch ihre umfangreichen Funktionen. Bereits nach kürzester Einarbeitungszeit lassen sich die eigenen Anwendungen mit Zip- und UnZip-Funktionen ausstatten. Ich habe mich entschlossen, für alle Visual Basic Entwickler das eigens für diese Toolbesprechung von mir erstellte Beispiels-Projekt hier zum Download bereitzustellen. Somit können auch Sie sich schnell von der IB Zip-DLL überzeugen.
Das VB Beispiels-Projekt zeigt, wie man ein ZIP-Archiv erstellt, die Dateien wieder extrahiert und auch eine selfexatrcting EXE erzeugen kann: IBZip_VB6Demo.zip (80 KByte) Die mir zum Test zugrunde liegende Version 3.0 der Zip-DLL erscheint in den kommenden Tagen. Das Demo lässt sich aber auch ohne Probleme mit der zur Zeit (noch) aktuellen Version 2.51 testen. Erweiterungen der Version 3.0 gegenüber Version 2.51
Preise
Bewertung
Fazit Kontakt Unterschiede Test- und Vollversion Diese Seite wurde bereits 27.505 mal aufgerufen. |
TOP! Unser Nr. 1 Neu! sevDataGrid 3.0 Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Tipp des Monats September 2024 Dieter Otter Übergabeparameter: String oder Array? Mit der IsArray-Funktion lässt sich prüfen, ob es sich bei einem Übergabeparameter an eine Prozedur um ein Array oder einer "einfachen" Variable handelt. TOP Entwickler-Paket TOP-Preis!! Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1605.50 EUR... |
|||||||||||||||||||||||||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |