MS Globix DLL ControlCreator

2021-03-19 14:05:46 +01:00
parent e62bed993e
commit 12348d6894
13 changed files with 296 additions and 94 deletions
--- a/GUIs.ZooFlow/ClassDataASorDB.vb
+++ b/GUIs.ZooFlow/ClassDataASorDB.vb
@@ -79,8 +79,7 @@ Public Class ClassDataASorDB
    End Function
    Public Sub Refresh_Connections()
        Try
-            Dim oSql = String.Format("SELECT * FROM TBDD_CONNECTION")
-            Dim oResult As DataTable
+            Dim oSql = String.Format("SELECT * FROM TBDD_CONNECTION WHERE AKTIV = 1")
            DT_CONNECTIONS = GetDatatable("DD_ECM", oSql, "TBDD_CONNECTION", "", "", "")
        Catch ex As Exception
            _Logger.Error(ex)