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

MS Bugfixing

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2019-09-12 11:13:05 +02:00
parent 825d273ed5
commit 871fd3beb1
6 changed files with 216 additions and 264 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
app/DD_PM_WINDREAM/frmMain.vb
View File

@@ -830,7 +830,7 @@ Public Class frmMain
Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','PM',{1})", Environment.UserName, CLIENT_SELECTED)
Dim DT_CHECKUSER_MODULE As DataTable = ClassDatabase.Return_Datatable(sql)
If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
USERCOUNT_LOGGED_IN = DT_CHECKUSER_MODULE.Rows(0).Item("USERCOUNT_LOGGED_IN")
USERCOUNT_LOGGED_IN = DT_CHECKUSER_MODULE.Rows(0).Item("USERCOUNT_LOGGED_IN") + 1
If USER_LANGUAGE = "de-DE" Then
tslblUserLoggedin.Text = "User eingeloggt: " & USERCOUNT_LOGGED_IN
Else