Save_InButtonOverride

MainHandling

app/DD_PM_WINDREAM/ClassInit.vb

@@ -86,11 +86,11 @@ Public Class ClassInit
                 CONNECTION_STRING_READ = CONNECTION_STRING
             End If
 
-            If CONFIG.Config.AppServerConfig <> String.Empty Then
+            If CONFIG.Config.EDMIAppServer <> String.Empty Then
 
 
                 Try
-                    Dim oSplit() = CONFIG.Config.AppServerConfig.ToString.Split(";")
+                    Dim oSplit() = CONFIG.Config.EDMIAppServer.ToString.Split(";")
                     Dim oAppServer = oSplit(0)
                     Dim oAppServerPort = 9000
                     If oSplit.Length = 2 Then
@@ -99,7 +99,7 @@ Public Class ClassInit
                     _Client = New Client(LOGCONFIG, oAppServer, oAppServerPort)
                     If Not IsNothing(_Client) Then
                         If _Client.Connect() Then
-                            APPSERVER_ACTIVE = True
+                            EDMIAppServerActive = True
                         End If
                     End If