AppFolders 属性

该属性返回“应用程序文件夹”的 SyncObject 对象。SyncObject 是当 MapiFolder 对象的 InAppFolderSyncObject 属性设置为 True 时自动添加文件夹的位置。SyncObject 允许用户同步 Microsoft Outlook 文件夹、通讯簿和文件夹主页供脱机使用。

expression  必选。该表达式返回 SyncObjects 对象。

示例

以下示例设置应用程序文件夹的 SyncObject 对象，并同步用户的“收件箱”。

Public Sub SetAppfolders()

    Dim olApp As New Outlook.Application
    Dim nsp As Outlook.NameSpace
    Dim objSycs As Outlook.SyncObjects
    Dim objSyc As Outlook.SyncObject
    Dim mpfInbox As Outlook.MAPIFolder

    Set nsp = olApp.GetNamespace("MAPI")
    Set objSycs = nsp.SyncObjects
    Set objSyc = objSycs.AppFolders
    Set mpfInbox = nsp.GetDefaultFolder(olFolderInbox)

    mpfInbox.InAppFolderSyncObject = True

    objSyc.Start

End Sub