Logging: Log Inner Exceptions

This commit is contained in:
Jonathan Jenne
2020-12-10 11:33:54 +01:00
parent b89ca3aa5a
commit 8ffec017e0
11 changed files with 282 additions and 22 deletions

View File

@@ -9,11 +9,15 @@ Public Class ServiceHost(Of T)
MyBase.New(GetType(T), baseAddresses)
End Sub
Public Sub EnableMetadataExchange(ByVal Optional EnableHttpGet As Boolean = True)
If State = CommunicationState.Opened Then
Throw New InvalidOperationException("Host is already opened")
End If
Dim oMetadataBehavior As ServiceMetadataBehavior = Description.Behaviors.Find(Of ServiceMetadataBehavior)()
If oMetadataBehavior Is Nothing Then