TbeCbFile

TbeCbFile()

Klasse zur Komprimierung/Dekomprimierung der Dateien. Es unterstützt mehrere Archivtypen(.zip, .tar, .tgz, .tar.gz).

Funktionen und Methoden

Methode	Beschreibung
Compress	Komprimiert eine Datei in eingegebenes Format(.zip, .tar, .tgz, .tar.gz).
	Parameter	Beschreibung
	aDestCompFile:C	Pfadangabe + Filename des zu erstellenden Archivs
	aSourceDir:C	Quellverzeichnis Achtung: Für die .tgz und .tar.gz Formaten muss in diesem Parameter den Ordner, wo .tar-Datei liegt, eingegeben werden!
	aSourceFiles:C	Name der zu komprimierenden Datei. Jokerzeichen sind möglich; Alle Dateien im Quellverzeichnis komprimieren= Leerstring (".txt" komprimiert alle Text-Dateien im Quellverzeichnis) Achtung: Für die .tgz und .tar.gz Formaten muss in diesem Parameter ein .tar-Datei eingegeben werden!*
	aPassword:C	Datei mit Passwort schützen; Kein Passwortschutz = Leerstring
	aRecurse:L	Rekursiv alle in Unterordnern enthaltenen Dateien mitkomprimieren = true
	aStorePaths:L	Quell-Ordnerstruktur im Archiv abbilden = true (lRelativePaths muss false sein)
	aRelativePaths:L	Relative Pfade verwenden = true
Decompress	dekomprimiert eine komprimierte Datei (.zip, .tar, .tgz, .tar.gz).
	Parameter	Beschreibung
	aSourceCompFile:C	Pfadangabe + Filename des Archivs
	aDestDir:C	Zielverzeichnis
	aDestFiles:C	Name der Datei(en), die aus dem Archiv entpackt werden sollen; Gesamtes Archiv entpacken = Leerstring
	aPassword:C	Passwort für Archiv; Kein Passwortschutz = Leerstring

Beispiel

CODE

| oFileObject |

startseq,
  oFileObject := CreateObject('TbeCbFile'),

//**********Dateien komprimieren**********//
//---in Zip komprimieren
  oFileObject.Compress('C:\temp\test.zip', 'C:\temp\', '', '', true, true, false),
//---in Tar komprimieren
  oFileObject.Compress('C:\temp\test.tar', 'C:\temp\', '', '', true, true, false),
//---in Tgz komprimieren
  oFileObject.Compress('C:\temp\test.tgz', 'C:\temp\', 'C:\temp\test.tar', '', true, true, false),
//---in Tar.gz komprimieren
  oFileObject.Compress('C:\temp\test.tar.gz', 'C:\temp\', 'C:\temp\test.tar', '', true, true, false),

//**********Dateien dekomprimieren**********//
//---Zip Archiv dekomprimieren
  oFileObject.Decompress('C:\temp\test.zip', 'C:\temp\testzip\', '', ''),
//---Tar Archiv dekomprimieren
  oFileObject.Decompress('C:\temp\test.tar', 'C:\temp\testtar\', '', ''),
//---Tgz Archiv dekomprimieren
  oFileObject.Decompress('C:\temp\test.tgz', 'C:\temp\testtgz\', '', ''),
//---Tar.gz Archiv dekomprimieren
  oFileObject.Decompress('C:\temp\test.tar.gz', 'C:\temp\testtargz\', '', ''),

always
  DestroyObject(oFileObject),
stopseq,