Offline 属性

       

返回 Boolean 类型值,指出 Microsoft Outlook 是联机(与服务器相连)还是脱机(不与服务器相连)。如果 Outlook 脱机则返回 True。只读。

expression.Offline

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

示例

以下函数根据 Namespace 对象当前是否联机返回 TrueFalse

Sub Off()
'Determines whether Outlook is currently Offline
    Dim olapp As New Outlook.Application
    Dim nmsName As NameSpace
    Set olapp = Outlook.Application
    Set nmsName = olapp.GetNamespace("MAPI")
    Dim blnOff As Boolean
    blnOff = IsOffline(nmsName)
End Sub

Function IsOffline(ByRef nmsName As NameSpace) As Boolean
'Retuns True if Outlook is offline
     IsOffline = nmsName.offline
End Function