Как выбрать следующее сообщение за пределами выделения в Mail с помощью Applescript?

Question

Я написал короткий Applescript, чтобы переместить выбранные сообщения в соответствующий архив для этого почтового ящика. Однако, когда он запускается, больше нет выбора. (Если я затем нажимаю вверх или вниз, он выбирает либо первое, либо последнее сообщение во всем почтовом ящике). Я не могу решить, как выбрать следующее сообщение за пределами текущего выбора с помощью AppleScript. Я не против, будет ли «следующий» сообщение до или после, пока оно находится рядом с выбором (который вот-вот исчезнет).

Если это помогает, вот мой Applescript:

tell application "Mail" 
    set selectedMessages to selection 
    repeat with theMessage in selectedMessages 
     set theAccount to account of mailbox of theMessage 
     set read status of theMessage to true 
     set mailbox of theMessage to mailbox "_old" of theAccount 
    end repeat 
end tell 

Answer 1

Попробуйте что-то вроде этого:

tell application "Mail" 
    set theSelection to selection 
    set theMessage to item 1 of theSelection 
    set theMailbox to theMessage's mailbox 
    set theMessageID to theMessage's id 
    set theMessageIDs to (id of every message of theMailbox) 
    -- do work here 
    set theMessages to (every message of theMailbox) 
    repeat with i from 1 to (count theMessageIDs) 
     if item i of theMessageIDs is theMessageID then 
      set message viewer 1's selected messages to {item i of theMessages} 
      exit repeat 
     end if 
    end repeat 
end tell 

Обратите внимание, что это предполагает несколько вещей, только выбранные один почтовый ящик, вы не перемещение последнего сообщения и т. д.