TbeCbFile

Klasse zur Steuerung von Dateien (inkl. Komprimierung/Dekomprimierung mehreren Archivtypen(.zip, .tar, .tgz, .tar.gz)).

Eigenschaften

Eigenschaft	Beschreibung
Name:C
Tag:N

Methoden

Methode	Beschreibung
GetFile(aFileName:C):O	liefert ein TbeCbFileControlObject Objekt zurück für die Bearbeitung einer oder mehreren Dateien
ReadAllFileContent(aFileName:C, aEncoding:N):C	Liest das ganze Inhalt einer Datei aus als Text.
WriteAllFileContent(aFileName:C, aFileEncoding:N, aContent:U, aContentEncoding:N)	Ersetzt den Inhalt einer Datei mit dem übergebenen Inhalt. Falls die Datei nicht existiert, dann wird sie angelegt.
AppendTextToFile(aFileName:C, aFileEncoding:N, aContent:U, aContentEncoding:N)	Fügt den Inhalt am Ende einer Datei hinzu. Falls die Datei nicht existiert, dann wird sie angelegt.
Compress(aDestCompFile:C, aSourceDir:C, aSourceFiles:C, aPassword:C, aRecurse:L, aStorePaths:L, aRelativePaths:L)	Komprimiert eine Datei in eingegebenes Format(.zip, .tar, .tgz, .tar.gz).
Decompress(aSourceCompFile:C, aDestDir:C, aDestFiles:C, aPassword:C)	dekomprimiert eine komprimierte Datei (.zip, .tar, .tgz, .tar.gz).

Beispiel

| 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,