Свойство NameSpace.SyncObjects (Outlook)
Возвращает коллекцию SyncObjects, содержащую все группы отправки и получения. Только для чтения.
Синтаксис
выражение. SyncObjects
Выражение Переменная, представляющая объект NameSpace .
Пример
В этом примере Microsoft Visual Basic для приложений (VBA) отображаются все группы отправки и получения, настроенные для пользователя, и запускается синхронизация на основе ответа пользователя.
Public Sub Sync()
Dim nsp As Outlook.NameSpace
Dim sycs As Outlook.SyncObjects
Dim syc As Outlook.SyncObject
Dim i As Integer
Dim strPrompt As Integer
Set nsp = Application.GetNamespace("MAPI")
Set sycs = nsp.SyncObjects
For i = 1 To sycs.Count
Set syc = sycs.Item(i)
strPrompt = MsgBox("Do you wish to synchronize " & syc.Name &"?", vbYesNo)
If strPrompt = vbYes Then
syc.Start
End If
Next
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.