Im Ordner Vergleichsdaten liegt eine Datei "Referenzgroesse.jpg" mit einer Größe von 264.626 KB sowie weitere Dateien mit exakt gleicher Größe oder > ( z.B. 264.782KB) aber Nie kleiner!
Nun sollten alle Dateien die > als 264.626KB sind farbig markiert werden.
Im Ordner sehe ich nur eine aufgerundete Größe 264KB, unter Dateiinfo ist die exakte Größe sichtbar.
Kann dieser kleine Unterschied per Script erkannt werden?
Beide Scripts als Applikationen sichern. Das erste wird per Doppelklick gestartet. Ein Dialog fordert auf, die Referenzdatei auszuwählen.
Dateien, deren Anzahl Bytes grösser ist, als jene der Referenzdatei, werden rot eingefärbt. Falls sich "leichtere" im Ordner befinden, werden diese grün bezeichnet.
Das zweite Script ist ein Droplet. Die Referenzdatei auf sein Icon ziehen.
Wetten, dass Du diese zweite Lösung bevorzugen wirst? ;-)
Nachzutragen ist noch, dass die Referenzdatei weder mit Namen noch mit Anzahl Bytes im Script-Code eingetragen ist. Dadurch wird möglich, eine beliebige Datei als Referenz zu bezeichnen.
kein Problem. Ich vermute, dass den Dateien keine Etikettenfarbe mehr zugewiesen werden muss.
Wie immer gilt: Der Zielordner muss nur beim ersten Ausführen gewählt werden. Danach ist der Pfad gespeichert und der Dialog erscheint erst wieder, wenn der Ordner umbennant oder verschoben worden ist. --- property noGoodFolder : ""
on open fileList if noGoodFolder is "" then set noGoodFolder to (choose folder with prompt ¬ "Den Ordner für die fehlerhaften Dateien auswählen.") as Unicode text [color=#0000FF]else try alias[/color] noGoodFolder on [color=#0000FF]error set[/color] noGoodFolder to (choose folder with prompt ¬ "Den Ordner für die fehlerhaften Dateien auswählen.") as [color=#0000FF]Unicode text end try end if set[/color] refFile to (item 1 of fileList) as [color=#0000FF]Unicode text set[/color] fileInfo to (info for file refFile) if folder of fileInfo is false then set refSize to size of (info for file refFile) else display dialog "Das war ein Ordner." buttons "OK" default button 1 with icon 0 error number -128 end if tell application "Finder" to set targetFolder to (container of file refFile) as Unicode text set fileList to list folder targetFolder without invisibles repeat with i from 1 to count of fileList set curName to item i of fileList set curFile to targetFolder & curName set curSize to size of (info for file curFile) if curSize is greater than refSize then try tell application "Finder" to move file curFile to folder noGoodFolder end try else if curSize is less than refSize then tell application "Finder" to set label index of file curFile to 6 end if end repeat end open --- Gruss, Hans