返回 Boolean 类型值,指出 Microsoft Outlook 是联机(与服务器相连)还是脱机(不与服务器相连)。如果 Outlook 脱机则返回 True。只读。
expression.Offline
expression 必选。该表达式返回 Namespace 对象。
以下函数根据 Namespace 对象当前是否联机返回 True 或 False。
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