[v10.9, Win&Mac] Dateiname bei ZIP

[Rene]

GM,

wenn ich über ich "Komprimierung und Verschlüsselung" verwende, dann habe bei dem Dateinamen einer ZIP diese Bezeichnung: Backup 7981.8369158848.33554433.8369158848-2024-03-23 19.26.34.zip.
Weshalb ist das so kryptisch und wie kann man da eigene Dateinamen kreieren (wo man auch Datum+Uhrzeit setzen lassen kann) bzw. nur das Datum setzen?

Das sind meine Einstellungen:

Screenshot 2024-03-29 104442.png (62.01 KiB) Viewed 323 times

[tobias]

Hi,
er ist so kryptisch, damit nicht versehentlich mehrere gleichzeitig laufende Profile, die denselben Zielordner haben, sich gegenseitig stören.

Ich würde als erstes mal anfangen mit den Häkchen "Profilnamen als Dateinamen für die Archivdatei benutzen". Dann wird der Name schon viel besser aussehen.

[tobias]

Hi,
mit Version 10.13.8 kann man den Dateinamen noch flexibler festlegen.

Hier sind zwei Scripte als Beispiel.

1. für ein Internetprotokoll auf der Zielseite (z. B. SFTP, DropBox):

Code: Select all

function OnCreateZipFile(var PathName: UnicodeString; const isTemp: Boolean): Boolean;
begin
  if not isTemp then begin
     PathName:=ConcatPathWithDelim(ExtractFilePathFTP(PathName),
                    'My Backup '+DateTimeToStrWithFormat(Now,'YYYYMMDD')+ExtractFileExt(PathName),
                    '/'); 
     Log('Zip Package Pathname set to: '+PathName);
     end; 
  Result:=true;
  end;

2. für einen lokalen Pfad oder Netzwerkpfad:

Code: Select all

function OnCreateZipFile(var PathName: UnicodeString; const isTemp: Boolean): Boolean;
begin
  PathName:=ConcatPathWithDelim(ExtractFilePath(PathName),
                    'My Backup '+DateTimeToStrWithFormat(Now,'YYYYMMDD')+ExtractFileExt(PathName),
                    PathDelim); 
  Log('Zip Package Pathname set to: '+PathName);
  Result:=true;
  end;

[Rene]

Die Skripte habe ich sowohl unter Windows als auch MacOS 14.4.1 getestet. Jedoch funktionieren diese nur in der Windows-Version.

Versionen von Syncovery:
Win: 10.13.8
Mac: 10.13.2 auf M3

Mir fiel auch beim Testen auf, daß es der Windows-Version egal ist, ob ich ZIP oder 7z verwende. Bei der Mac-Version hingegen, unterscheidet Syncovery dies, d.h. wenn ich dort ZIP ausgewählt habe, dann wird das Skript ausgeführt, bei 7z hingegen nicht.

Addenda:
Ich habe die Windows-Skripte auf meine Belange angepaßt und will es nicht vorenthalten.

Lokal, Netzwerk

Code: Select all

function OnCreateZipFile(var PathName: UnicodeString; const isTemp: Boolean): Boolean;
var VarFileName: UnicodeString;

begin
  VarFileName:=DateTimeToStrWithFormat(Now,'YYYY-MM-DD_hh-mm-ss')+' - '+ProfileName+ExtractFileExt(PathName)
  VarFileName:=StringReplace(VarFileName, ':', ' -', true);
  // VarFileName:=StringReplace(VarFileName, ' ', '_', true);
  VarFileName:=LowerCase(VarFileName);
  PathName:=ConcatPathWithDelim(ExtractFilePath(PathName), VarFileName, PathDelim);
  Log('Zip Package Pathname set to: '+PathName);
  Result:=true;
end;

SFTP, Dropbox usw.

Code: Select all

function OnCreateZipFile(var PathName: UnicodeString; const isTemp: Boolean): Boolean;
var VarFileName: UnicodeString;

begin
  if not isTemp then begin
    VarFileName:=DateTimeToStrWithFormat(Now,'YYYY-MM-DD_hh-mm-ss')+' - '+ProfileName+ExtractFileExt(PathName)
    VarFileName:=StringReplace(VarFileName, ':', ' -', true);
    VarFileName:=LowerCase(VarFileName);
    PathName:=ConcatPathWithDelim(ExtractFilePathFTP(PathName), VarFileName, '/'); 
    Log('Zip Package Pathname set to: '+PathName);
    end; 
  Result:=true;
end;

[tobias]

Hi,
momentan gibt es noch keine Mac-Version, die dieses Script unterstützt.

Wird eventuell heute oder morgen erscheinen.

[Rene]

Ich habe die 10.14.3 auf meinem Apple M3 installiert.
Gibt es die Funktion für das Skript noch nicht drin? Das Original-Skript für SFTP funktioniert nicht.

Code: Select all

function OnCreateZipFile(var PathName: UnicodeString; const isTemp: Boolean): Boolean;
begin
  if not isTemp then begin
     PathName:=ConcatPathWithDelim(ExtractFilePathFTP(PathName),
                    'My Backup '+DateTimeToStrWithFormat(Now,'YYYYMMDD')+ExtractFileExt(PathName),
                    '/'); 
     Log('Zip Package Pathname set to: '+PathName);
     end; 
  Result:=true;
  end;

[tobias]

Man muss da leider die Intel-Version nehmen.

[Rene]

OK.

Hat das technische Gründe, daß das in der Silicon-Version nicht funktioniert?

[tobias]

Ja, der PascalScript-Compiler arbeitet auch mit direkten CPU-Befehlen, die leider noch keiner an Arm64 angepasst hat. Ich werde es dieses Jahr mal selbst versuchen.