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

全部,

我正在尝试创建一个applescript，它允许我创建word文档（商业计划书）。其中一个部分是能够使用applescript从Microsoft outlook中选择客户端

我知道如何在VBA中实现这一点，但在Applescript中我似乎无法理解。基本上，我需要一个对话框，要么有我的所有Outlook联系人列表，我可以从中选择一个

非常感谢，

---

-J

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

脚本基本上有两个部分：获取联系人姓名和显示信息。获取联系人很容易，因为

联系人

是应用程序本身的属性。在40多个联系人中运行此功能只需一秒钟

呈现数据并获得选择并不那么明显。要显示的数据必须是字符串。老实说，我忘记了为什么我将

作为文本悬挂在末尾，但我似乎记得，如果一切都作为某种字符串处理，那么这样做会更容易。验证选择后，返回“False”意味着用户单击了
取消
按钮，然后您可以继续使用我放置
显示对话框
的字符串。不幸的是，您无法获得行号或任何类似的方便信息。它就是不能那样工作，所以你必须做一些推诿，才能回到相应的
联系人
对象本身

加盐调味…
快速且肮脏，但这是有效的（Office 2008）

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

呈现数据并获得选择并不那么明显。要显示的数据必须是字符串。老实说，我忘记了为什么我将
作为文本悬挂在末尾，但我似乎记得，如果一切都作为某种字符串处理，那么这样做会更容易。验证选择后，返回“False”意味着用户单击了
取消
按钮，然后您可以继续使用我放置
显示对话框
的字符串。不幸的是，您无法获得行号或任何类似的方便信息。它就是不能那样工作，所以你必须做一些推诿，才能回到相应的
联系人
对象本身

加盐调味

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