AppFolders Property

Microsoft Outlook Visual Basic

expression.AppFolders

expression    Required. An expression that returns a SyncObjects object.

Example

The following example sets the SyncObject for the application folders and synchronizes the user's Inbox.

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