在特定文件夹中打开电子邮件
Open email in specific folder
我在访问 Outlook 中特定文件夹中的电子邮件时遇到问题。
当我将电子邮件放入收件箱时,以下代码行有效。
Set OtlkApp = GetObject(, "Outlook.application")
Set ns = OtlkApp.GetNamespace("MAPI")
Set fldr = ns.GetDefaultFolder(olFolderInbox)
但是,当我尝试访问名为 "tempfiles" 的文件夹时,当我尝试使用此代码打开它时找不到对象。
Set fldr = ns.Folders("tempfiles")
语法正确吗?我错过了什么吗?
根据临时文件夹的级别(收件箱的同一级别或子文件夹)扩展文件夹 属性:
'INBOX FOLDER
Set inboxfldr = ns.GetDefaultFolder(olFolderInbox)
'TEMPFILES SUBFOLDER
Set tempfilesfldr = inboxfldr.Folders("tempfiles")
'TEMPFILES FOLDER (SAME LEVEL AS DEFAULT FOLDERS -INBOX, CALENDAR, TASKS, ETC.)
Set tempfilesfldr = inboxfldr.Parent.Folders("tempfiles")
我在访问 Outlook 中特定文件夹中的电子邮件时遇到问题。
当我将电子邮件放入收件箱时,以下代码行有效。
Set OtlkApp = GetObject(, "Outlook.application")
Set ns = OtlkApp.GetNamespace("MAPI")
Set fldr = ns.GetDefaultFolder(olFolderInbox)
但是,当我尝试访问名为 "tempfiles" 的文件夹时,当我尝试使用此代码打开它时找不到对象。
Set fldr = ns.Folders("tempfiles")
语法正确吗?我错过了什么吗?
根据临时文件夹的级别(收件箱的同一级别或子文件夹)扩展文件夹 属性:
'INBOX FOLDER
Set inboxfldr = ns.GetDefaultFolder(olFolderInbox)
'TEMPFILES SUBFOLDER
Set tempfilesfldr = inboxfldr.Folders("tempfiles")
'TEMPFILES FOLDER (SAME LEVEL AS DEFAULT FOLDERS -INBOX, CALENDAR, TASKS, ETC.)
Set tempfilesfldr = inboxfldr.Parent.Folders("tempfiles")