检查文件夹类型

时间:2013-08-23 14:32:05

标签: vbscript outlook outlook-2010

我遍历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

现在,我的邮箱中有多个联系人类型的文件夹。

还有其他方法可以了解文件夹类型吗?

1 个答案:

答案 0 :(得分:0)

事实上,检查

folder.DefaultItemType 

这将返回一个项目类型,如olMailItem,并根据您可以“假设”文件夹类型。