Question

嘿，我在这里使用这段代码：

Dim tempInbox As Outlook.MAPIFolder
Dim InboxItems As Outlook.Items
Dim newMail As Outlook.MailItem
Dim customFolder As String = "Mainbox - testing here"

tempApp = CreateObject("Outlook.Application")
tempInbox = tempApp.GetNamespace("Mapi").GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox).Parent.Folders(customFolder)
InboxItems = tempInbox.Items

For Each newMail In InboxItems
 ......

为了抓住用户的电子邮件。问题是找不到 Mainbox - 此处测试文件夹的名称（操作失败。无法找到对象。）和此行上的错误：

tempInbox = tempApp.GetNamespace("Mapi").GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox).Parent.Folders(customFolder)

如果我在电子邮箱中使用文件夹：

Mainbox - My Name Here
  A Folder 1
  A Folder 2

使用上面的代码就可以了。

为了找到这个自定义文件夹，我会缺少什么？

文件夹结构如下所示：

Mainbox - My Name Here
  A Folder 1
  A Folder 2
Archive Folders
  Deleted Items
  Send Items
Mainbox - testing here
  Inbox
Vault - My Name Here
  A Folder 1
  A Folder 2

Answer 1

您的代码假定该文件夹与收件箱位于同一级别。

使用Namespace.Folders.Item（customFolder）

VB.net Outlook获取自定义文件夹邮件

1 个答案: