Applescript 使用 Microsoft Outlook 联系人填充对话框列表

Question

总之，

我正在尝试创建一个applescript，它允许我创建一个word文档（商业提案）。其中之一是能够使用 applescript 从 Microsoft Outlook 中选择客户端。

我知道如何在 VBA 中执行此操作，但在 Applescript 中我似乎无法弄清楚。基本上，我需要一个对话框，其中包含所有 Outlook 联系人的列表，我可以从中选择一个。

非常感谢， -J

Answer 1

又快又脏，但是可行（Office 2008） 该

tell application "Microsoft Entourage"

    set contactList to {}
    set lastContact to (count contacts)
    repeat with thisContact from 1 to lastContact
        set theContact to item thisContact of contacts
        set end of contactList to (first name of theContact & " " & last name of theContact)
    end repeat

    set contactSelected to (choose from list contactList with prompt "Please select a contact." without multiple selections allowed) as text

    if (contactSelected is not "False") then
        display dialog contactSelected
    end if

end tell

脚本本质上有两个部分：获取联系人姓名和显示信息。获取联系人很容易，因为 contacts 是应用程序本身的属性。在 40 多个联系人中运行此操作只需一秒钟。

呈现数据并进行选择并不是那么明显。要呈现的数据必须是一个字符串。老实说，我忘记了为什么我有 as text 悬在末尾，但我似乎记得，如果所有内容都作为某种字符串处理，那么这样做会更容易。一旦验证了选择（返回“False”意味着用户单击了取消按钮），您就可以继续使用我放置显示对话框的字符串。不幸的是，您没有得到行号或类似的方便信息。它只是无法以这种方式工作，因此您必须做一些捏造才能返回到相应的 contact 对象本身。

加盐调味...