使用 AppleScript 通过 Outlook for Mac 发送电子邮件不再有效

Question

我有一个 AppleScript，它读取包含地址列表的文本文件，然后在 Outlook 中为每个地址创建一个带有主题的消息，并自动发送电子邮件。这是过去一年左右的工作，但它不再按预期工作。我不确定这是否是最近更新的 Outlook 或我的 Mac OS 造成的。现在发生的是，它只会发送txt文件第一行的地址。

结果窗口中的错误消息是：

error "Can’t get every to recipient of missing value." number -1728 from every «class trcp» of missing value

在事件窗口中：

tell application "Microsoft Outlook"
    read "/Users/******/OneDrive/address.txt" as «class utf8»
end tell
tell current application
    read "/Users/******/OneDrive/address.txt" as «class utf8»
end tell
tell application "Microsoft Outlook"
    set the clipboard to "abuse@*****"
    make new outgoing message with properties {subject:"this is a test"}
    make new recipient with properties {email address:{address:"abuse@****"}} at end of every to recipient of outgoing message id 465175
    send outgoing message id 465175
    set the clipboard to "postmaster@*****"
    make new outgoing message with properties {subject:"this is a test"}
Result:
error "Can’t get every to recipient of missing value." number -1728 from every «class trcp» of missing value

在回复窗口中：

tell application "Microsoft Outlook"
    read "/Users/******/OneDrive/address.txt" as «class utf8»
        --> error number -10004
end tell
tell current application
    read "/Users/******/OneDrive/address.txt" as «class utf8»
        --> "abuse@****
postmaster@****"
end tell
tell application "Microsoft Outlook"
    set the clipboard to "abuse@*****"
    make new outgoing message with properties {subject:"this is a test"}
        --> outgoing message id 465175
    make new recipient with properties {email address:{address:"abuse@****"}} at end of every to recipient of outgoing message id 465175
        --> to recipient 1 of outgoing message id 465175
    send outgoing message id 465175
    set the clipboard to "postmaster@*****"
    make new outgoing message with properties {subject:"this is a test"}
        --> missing value
Result:
error "Can’t get every to recipient of missing value." number -1728 from every «class trcp» of missing value

当我查看 Outlook 的 AppleScript 库时，我注意到我找不到收件人的参考。我还尝试了来自其他在线来源的代码，这些代码被报告为直接在代码中使用单个地址进行工作和测试，但我仍然收到类似的错误“缺失值”

我的 Outlook 版本为 16.39 (20071300) 我的 MacOS 是 10.15.5 版

这是脚本，为了隐私，我在 mac 上标出了用户名； 告诉应用程序“Microsoft Outlook”

set srcFile to ("/Users/******/OneDrive/address.txt") as text

set lns to paragraphs of (read srcFile as «class utf8»)
repeat with ln in lns
    set the clipboard to ln
    set theMessage to make new outgoing message with properties {subject:"this is a test"}
    make new recipient with properties {email address:{address:ln}} at end of to recipients of theMessage
    send theMessage
end repeat

说完

谁能帮忙？

Answer 1

您好，我在 office 更新 16.39 后遇到了类似的问题，之前的 office 版本 16.38 可以正常工作。

如果 Outlook mac 关闭，此脚本只能运行一次。在没有再次关闭 Outlook 的情况下进行第二次尝试后，它会产生错误：

tell application "Microsoft Outlook"
    set theMessage to make new outgoing message with properties {sender:{name:"My Name", address:"demo@demo.com"}, subject:"test", plain text content:"Hallo"}
    
    tell theMessage
        make new to recipient with properties {email address:{address:"test@test.com"}}
    end tell
    send theMessage
end tell

厄格布尼斯： 错误“缺失值 versteht die Nachricht „make“ nicht。”缺失值中的数字 -1708

已翻译：“缺失值无法理解 ma​​ke 消息”或 "缺失值不理解 ma​​ke 事件"

Answer 2

加里，

请提交错误报告。说明在这个帖子里

https://answers.microsoft.com/en-us/msoffice/forum/all/applescript-outlook-send-mail-stops-working-with/c7e63696-0a71-4e68-9764-f7e7794b92fd

Answer 3

我可以确认我的发送邮件错误已通过 Outlook 16.41 (20072700) Insider Fast Release 得到修复