我遍历Outlook存储的每个文件夹,通过检索所有默认文件夹并比较其EntryID来检查文件夹类型。
Public Function GetFolderTypeName(objFolder)
Dim objType, objDefaultFolder
'dctValidFolders is a dictionary of default folders type
For Each objType in dctValidFolders
Set objDefaultFolder = objMAPI.GetDefaultFolder(dctValidFolders.Item(objType))
If objFolder.EntryID = objDefaultfolder.EntryID Then
Set objDefaultfolder = Nothing
GetFolderTypeName = objType
Exit Function
End If
Next
End Function
现在,我的邮箱中有多个联系人类型的文件夹。
还有其他方法可以了解文件夹类型吗?
答案 0 :(得分:0)
事实上,检查
folder.DefaultItemType
这将返回一个项目类型,如olMailItem,并根据您可以“假设”文件夹类型。