rename ECM references to IDB

This commit is contained in:
Jonathan Jenne
2019-05-24 11:31:36 +02:00
parent 9296a08f93
commit dfb9cf2ea9
51 changed files with 862 additions and 853 deletions

View File

@@ -2,12 +2,12 @@
Imports System.ServiceModel
Imports System.Threading
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.EDMIAPI.EDMIServiceReference
Imports DigitalData.Modules.EDMIAPI.IDBServiceReference
Public NotInheritable Class frmSplash
Private _Worker As New BackgroundWorker()
Private _ChannelFactory As ChannelFactory(Of IEDMServiceChannel)
Private _Channel As IEDMServiceChannel
Private _ChannelFactory As ChannelFactory(Of IIDBServiceChannel)
Private _Channel As IIDBServiceChannel
Private _Logger As Logger
Private _CurrentRetry As Integer = 0
@@ -98,12 +98,12 @@ Public NotInheritable Class frmSplash
Thread.Sleep(SLEEP_TIME)
End Sub
Private Sub bw_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs)
Private Sub bw_ProgressChanged(sender As Object, e As ProgressChangedEventArgs)
pbStatus.Value = e.ProgressPercentage
lblStatus.Text = e.UserState.ToString()
End Sub
Private Sub bw_RunWorkerCompleted(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs)
Private Sub bw_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs)
' Bei Fehler MsgBox anzeigen und Programm beenden
If e.Error IsNot Nothing Then
MsgBox(e.Error.Message, MsgBoxStyle.Critical, "Unhandled Error")