rename ECM references to IDB

SERVICES/DDEDM_NetworkService/WindowsService.vb

@@ -1,17 +1,13 @@
 Imports System.ServiceModel
 Imports System.ServiceProcess
-Imports System.Configuration
 Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Database.Exceptions
-Imports System.ServiceModel.Channels
-Imports System.ServiceModel.Dispatcher
 
 Public Class WindowsService
     Inherits ServiceBase
 
     Private _serviceHost As ServiceHost = Nothing
-    Private _edmService As EDMService = Nothing
+    Private _edmService As IDBService = Nothing
 
     Private _logConfig As LogConfig
     Private _logger As Logger
@@ -49,24 +45,29 @@ Public Class WindowsService
 
             _logger.Info("Database connection established.")
 
-            EDMService.Database = _db
-            EDMService.LogConfig = _logConfig
-            EDMService.AppConfig = _config
+            IDBService.Database = _db
+            IDBService.LogConfig = _logConfig
+            IDBService.AppConfig = _config
 
             _logger.Debug("Starting WCF ServiceHost...")
 
-            _serviceHost = New ServiceHost(GetType(EDMService))
+            _serviceHost = New ServiceHost(GetType(IDBService))
             _serviceHost.Open()
 
-            _logger.Info("WCF ServiceHost started.")
+            _logger.Debug("WCF ServiceHost started.")
 
             _logger.Info("Service {0} successfully started.", SERVICE_DISPLAY_NAME)
         Catch ex As Exception
             _logger.Error(ex, "Failed to start the service host!")
+            GracefullyStop()
         End Try
     End Sub
 
     Protected Overrides Sub OnStop()
+        GracefullyStop()
+    End Sub
+
+    Private Sub GracefullyStop()
         If _serviceHost IsNot Nothing Then
             _serviceHost.Close()
             _serviceHost = Nothing