SyncObject.Stop 方法 (Outlook)
立刻结束使用同步处理用户的文件夹指定的 发送/接收组。
语法
expression。 Stop
表达 一个代表 SyncObject 对象的变量。
备注
此方法不能撤消任何已经发生的同步处理。
示例
此 Microsoft Visual Basic for Applications (VBA) 示例显示为用户设置的所有 发送/接收组,并开始根据用户的响应同步。 该子例程后面的下立即停止同步。 syc
变量声明为公用变量,因此两个子例程都可以引用。
Public syc As Outlook.SyncObject
Public Sub Sync()
Dim nsp As Outlook.NameSpace
Dim sycs As Outlook.SyncObjects
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
Private Sub StopSync()
MsgBox "Synchronization stopped by the user."
syc.Stop
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。