AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

ZooFlow: Remove modcurrent, move flowsearch, small changes

Browse Source
This commit is contained in:
Jonathan Jenne
2021-01-12 10:58:27 +01:00
parent e8358e2921
commit 6fd11a09c7
13 changed files with 38 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
GUIs.ZooFlow/ApplicationEvents.vb
View File

@@ -54,16 +54,17 @@ Namespace My
If oConfigManager.Config.AppServerConfig <> String.Empty Then
Try
Dim oSplit() As String = oConfigManager.Config.AppServerConfig.ToString.Split(":")
Dim oSplit() As String = oConfigManager.Config.AppServerConfig.ToString.Split(":"c)
Dim oAppServerAddress As String = oSplit(0)
Dim oAppServerPort As Integer = 9000
If oSplit.Length = 2 Then
oAppServerPort = oSplit(1)
End If
_Client = New Client(LogConfig, oAppServerAddress, oAppServerPort)
If Not IsNothing(_Client) Then
If _Client.Connect() Then
APPSERVER_ACTIVE = True
My.Application.Service.Client = New Client(LogConfig, oAppServerAddress, oAppServerPort)
If Not IsNothing(My.Application.Service.Client) Then
If My.Application.Service.Client.Connect() Then
My.Application.Service.IsActive = True
End If
End If
Catch ex As Exception