Microsoft Outlook互操作引发COMException（0x84130003）

Question

我似乎无法找到这个异常代码在Google或MSDN上显示的内容，并且它间歇性地发生，没有我能辨别的模式。以前有人碰过这个吗？失败似乎发生在最后一行：

Dim olApp As New Outlook.Application
Dim olNS As Outlook.NameSpace = olApp.GetNamespace("MAPI")
Dim olMail As Outlook.MailItem = olApp.CreateItem(Outlook.OlItemType.olMailItem)

任何帮助都将不胜感激。

Answer 1

看起来您还没有创建olApp对象。

Set olApp = CreateObject("Outlook.Application")

此链接可以帮助您： http://support.microsoft.com/kb/220595