on open theDropList
-- On utilise l'application "Finder"
tell application "Finder"
-- On fait une boucle sur chaque élément déposé sur le script
repeat with theItem in theDropList
-- Une structure de contrôle pour traquer les eventuelles erreurs
try
-- On récupère le nom actuel de l'item
set theOldName to name of the item (theItem as alias)
-- On demande le nouveau nom de l'item
set theNewName to text returned of ¬
(display dialog ("Notez le nouveau nom de l'item :" & ¬
return & return & "\"" & theOldName & "\"" & return & return) ¬
default answer theOldName with icon 1)
-- On renomme le item
set the name of the item (theItem as alias) to theNewName
on error mer number ner
if ner is not -128 then display dialog "" & ner & " : " & mer with icon 0
end try
end repeat
end tell
end open