update Service Reference in EDMI.API

This commit is contained in:
Jonathan Jenne
2020-04-07 10:47:04 +02:00
parent fa476e3101
commit 37a3675d84
28 changed files with 405 additions and 424 deletions

View File

@@ -2,7 +2,7 @@
Imports System.ServiceModel.Channels
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.EDMI.API.IDBServiceReference
Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
Imports DigitalData.GUIs.ClientSuite.Base
Imports System.ServiceModel.Security
@@ -73,15 +73,15 @@ Public Class ClassService
End Function)
End Function
Public Function GetChannelFactory() As IChannelFactory(Of IIDBServiceChannel)
Public Function GetChannelFactory() As IChannelFactory(Of IEDMIServiceChannel)
Return GetChannelFactory(My.SysConfig.ServiceConnection)
End Function
Public Function GetChannelFactory(EndpointURL As String) As ChannelFactory(Of IIDBServiceChannel)
Public Function GetChannelFactory(EndpointURL As String) As ChannelFactory(Of IEDMIServiceChannel)
Dim oBinding = GetBinding()
Dim oEndpoint = New EndpointAddress(EndpointURL)
Dim oFactory As New ChannelFactory(Of IIDBServiceChannel)(oBinding, oEndpoint)
Dim oFactory As New ChannelFactory(Of IEDMIServiceChannel)(oBinding, oEndpoint)
Return oFactory
End Function