Hallo Willem,
ja, es nicht so einfach. Die folgende Lösung nimmt an, dass die Suffixe immer drei Buchstaben
haben. Die Zeile 'if fullPath ends with ":" then' prüft, ob es ein Ordner ist. Wenn nicht, wird
weitergefahren und geprüft, ob der viertletzte Buchstabe des Pfades ein Punkt ist. Wenn ja,
wird der neue Namen ermittelt, nämlich die Zeichen 1 bis -5 des letzten Elementes des Pfades.
Schliesslich wird der Finder beauftragt, den Namen zu ändern.
Der 'try'-Wickel ist notwendig, um eine Fehlermeldung zu unterdücken, falls eine gleichnamige
Datei schon existiert. In einem solchen Fall wird der Zähler 'ctr' inkrementiert und am Schluss
wird, falls der Wert von 'ctr' grösser als Null ist, ein Dialog gezeigt.
Es findet keine Prüfung statt, ob das Suffix wirklich eines ist. Aber sehr wahrscheinlich ist
dies für Deine Zwecke nicht notwendig. Sonst könnte man noch einen Test einbauen.
---
[size 3][blue]on[/blue] [blue]open[/blue] [green]fileList[/green]
[nbsp] [nbsp][blue]set[/blue] [green]ctr[/green] [blue]to[/blue] 0
[nbsp] [nbsp][blue]set[/blue] [blue]AppleScript[/blue]'s [blue]text item delimiters[/blue] [blue]to[/blue] {":"}
[nbsp] [nbsp][blue]repeat[/blue] [blue]with[/blue] [green]aFile[/green] [blue]in[/blue] [green]fileList[/green]
[nbsp] [nbsp] [nbsp] [blue]set[/blue] [green]fullPath[/green] [blue]to[/blue] [green]aFile[/green] [blue]as[/blue] [blue]string[/blue]
[nbsp] [nbsp] [nbsp] [blue]if[/blue] [green]fullPath[/green] [blue]ends with[/blue] ":" [blue]then[/blue]
[nbsp] [nbsp] [nbsp] [blue]else[/blue]
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp][blue]if[/blue] [blue]character[/blue] -4 [blue]of[/blue] [green]fullPath[/green] [blue]is[/blue] "." [blue]then[/blue]
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [blue]set[/blue] [green]newName[/green] [blue]to[/blue] [blue]text[/blue] 1 [blue]thru[/blue] -5 [blue]of[/blue] ([blue]text item[/blue] -1 [blue]of[/blue] [green]fullPath[/green])
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [blue]try[/blue]
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp][blue]tell[/blue] [blue]application[/blue] "Finder" [blue]to[/blue] [blue]set[/blue] [blue]name[/blue] [blue]of[/blue] [blue]file[/blue] [green]fullPath[/green] [blue]to[/blue] [green]newName[/green]
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [blue]on[/blue] [blue]error[/blue]
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp][blue]set[/blue] [green]ctr[/green] [blue]to[/blue] [green]ctr[/green] + 1
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [blue]end[/blue] [blue]try[/blue]
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp][blue]end[/blue] [blue]if[/blue]
[nbsp] [nbsp] [nbsp] [blue]end[/blue] [blue]if[/blue]
[nbsp] [nbsp][blue]end[/blue] [blue]repeat[/blue]
[nbsp] [nbsp][blue]set[/blue] [blue]AppleScript[/blue]'s [blue]text item delimiters[/blue] [blue]to[/blue] {""}
[nbsp] [nbsp][blue]if[/blue] [green]ctr[/green] = 1 [blue]then[/blue]
[nbsp] [nbsp] [nbsp] [blue]display dialog[/blue] "Eine Datei konnte nicht umbenannt werden." [blue]buttons[/blue] ¬
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp]"OK" [blue]default button[/blue] 1 [blue]with icon[/blue] 2
[nbsp] [nbsp][blue]else[/blue] [blue]if[/blue] [green]ctr[/green] > 1 [blue]then[/blue]
[nbsp] [nbsp] [nbsp] [blue]display dialog[/blue] "" & [green]ctr[/green] & " Dateien konnten nicht umbenannt werden." [blue]buttons[/blue] ¬
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp]"OK" [blue]default button[/blue] 1 [blue]with icon[/blue] 2
[nbsp] [nbsp][blue]end[/blue] [blue]if[/blue]
[blue]end[/blue] [blue]open[/blue][/size]
---
Das Droplet sende ich Dir zu.
Gruss, Hans
