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

MS Version

Browse Source
This commit is contained in:
SchreiberM 2023-03-16 12:13:13 +01:00
parent dba964ba8a
commit 6ad6c87a87
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
DDUserManager/DDUserManager/My Project/AssemblyInfo.vb
View File

@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.2.1.0")>
<Assembly: AssemblyVersion("2.0.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>

2
DDUserManager/DDUserManager/frmMain.vb
View File

@ -67,7 +67,7 @@ Public Class frmMain
TBDD_USERTableAdapter.Connection.ConnectionString = MyConnectionString
TBDD_USER_MODULESTableAdapter.Connection.ConnectionString = MyConnectionString
Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','UM',{1})", Environment.UserName, 1)
Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','UM',{1},'')", Environment.UserName, 1)
Dim DT_CHECKUSER_MODULE As DataTable = MyDatabase.GetDatatable(sql)
If DT_CHECKUSER_MODULE.Rows.Count = 0 Then