ChangeAgent
Mitglied
Thread Starter
- Dabei seit
- 25.03.2007
- Beiträge
- 45
- Reaktionspunkte
- 4
Ich habe gerade von 2011 auf 365 aktualisiert. Das folgende Skript hat 2011 einwandfrei funktioniert, um Nachrichten dauerhaft aus Outlook zu löschen. Es hörte unter 365 auf. Ich bastelte daran, konnte es aber unter 365 nicht zum Laufen bringen. Sieht jemand, was es sein könnte?
tell application "Microsoft Outlook"
set theMsgs to the current messages -- selected messages
try
repeat with theMsg in theMsgs
permanently delete theMsg
end repeat
on error errMsg number errNum
set theSubject to subject of theMsg
set theFolder to name of «class stor» of theMsg
beep
display dialog errMsg & return & return & errNum & return & return & "(Erroring on message: "& theSubject & " in " & theFolder & ")" with icon 2
end try
end tell
danke
tell application "Microsoft Outlook"
set theMsgs to the current messages -- selected messages
try
repeat with theMsg in theMsgs
permanently delete theMsg
end repeat
on error errMsg number errNum
set theSubject to subject of theMsg
set theFolder to name of «class stor» of theMsg
beep
display dialog errMsg & return & return & errNum & return & return & "(Erroring on message: "& theSubject & " in " & theFolder & ")" with icon 2
end try
end tell
danke