Common/DocumentResultList: Check for service object

This commit is contained in:
Jonathan Jenne 2022-10-05 12:28:02 +02:00
parent ba86abecde
commit 45dad1bf0a

View File

@ -127,7 +127,7 @@ Public Class frmDocumentResultList
Private Function GetOperationMode() As OperationMode Private Function GetOperationMode() As OperationMode
Dim oOperationMode As OperationMode Dim oOperationMode As OperationMode
If Environment.Service.Client.IsOnline AndAlso Environment.Service.Address <> String.Empty Then If Environment.Service IsNot Nothing AndAlso Environment.Service.Client.IsOnline AndAlso Environment.Service.Address <> String.Empty Then
oOperationMode = OperationMode.WithAppServer oOperationMode = OperationMode.WithAppServer
Else Else
oOperationMode = OperationMode.NoAppServer oOperationMode = OperationMode.NoAppServer