0

我目前正在开发一个小型应用程序，该应用程序允许我对用户的个人资料进行一些更改，即添加或删除特定的 PST 文件并将联系人/日历从附加的 PST 文件传输到他们的主邮箱。这是针对 Outlook 2007 的。经过一番搜索，我在 Outlook 中找到了一个我希望尽可能使用的枚举：OlExchangeStoreType。

我想用它来帮助确定我在哪个存储上运行（例如，公共、主要或 PST 文件）。我只是不确定如何才能达到它。我在我的代码中使用后期绑定来解决在不同版本之间移动可能出现的问题。当前绑定：

Dim olApp,olNS
On Error Resume Next
    olApp = GetObject(, "Outlook.Application")
    On Error GoTo 0

    If olApp Is Nothing Then
        olApp = CreateObject("Outlook.Application")
        olNS = olApp.GetNamespace("MAPI")
    Else
        olNS = olApp.GetNamespace("MAPI")
    End If

这工作正常。如果我尝试使用 GetObject(, "Outlook")，则会得到“无法创建 ActiveX 组件”。

是否有可以用于 Outlook 的界面，可以让我访问公共枚举？

至于我为什么要这样做，我不想处理宏安全问题，也不想将宏推送给多个用户。我也是使用 VBA 的新手，所以可能有比我尝试做的更简单的方法。

让我知道你的想法。谢谢，

4

1 回答 1

0

弄清楚了。我最初的印象是枚举值是类的对象，但它们只是整数。

我发现 StoreObj.ExchangeStoreType

将返回一个与 OlExchangeStoreType 使用的匹配的整数。我将在我的课堂上重新创建枚举。

谢谢，

于 2013-07-22T03:47:39.203 回答