MS Administration ProfileGrid, Config Charts, LU Grid Add MEthod disappeared

This commit is contained in:
2020-05-20 13:51:18 +02:00
parent f3bc104b37
commit 9eb6b594ba
35 changed files with 4763 additions and 1464 deletions

View File

@@ -0,0 +1,18 @@
Public Class frmGhostMode
Private Sub frmGhostMode_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim oSQL = "SELECT CONFIG_VALUE FROM TBIDB_BASE WHERE CONFIG_NAME = 'GHOST_SELECT'"
oSQL = ClassDatabase.Execute_Scalar_ConStr(oSQL, CONNECTION_STRING_IDB)
Dim DT_USER = ClassDatabase.Return_Datatable(oSQL)
Try
If Not IsNothing(DT_USER) Then
GridControl1.DataSource = DT_USER
End If
Catch ex As Exception
MsgBox("Error Load_Users:" & vbNewLine & ex.Message)
End Try
End Sub
End Class