tell application "Finder"
    activate
    set fileSelection to selection
    repeat with theFile in fileSelection
        set theName to name of (theFile as alias)
        set SpotligthComment to comment of (theFile as alias)
        if SpotligthComment is not "" then
            set theExtension to name extension of (theFile as alias)
            set newName to SpotligthComment
            set name of file (theFile as alias) to ¬
                (newName & "." & theExtension)
        else
            display dialog "no comment in this file:   " & theName
        end if
    end repeat
end tell