From e8416c5d83bf097bf692a173f84fd05b3cc079ac Mon Sep 17 00:00:00 2001 From: SchreiberM Date: Tue, 14 Nov 2023 11:03:22 +0100 Subject: [PATCH] MS --- DDUserManager/DDUserManager/frmMain.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/DDUserManager/DDUserManager/frmMain.vb b/DDUserManager/DDUserManager/frmMain.vb index 547d994..94f600c 100644 --- a/DDUserManager/DDUserManager/frmMain.vb +++ b/DDUserManager/DDUserManager/frmMain.vb @@ -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) Dim DT_CHECKUSER_MODULE As DataTable = MyDatabase.GetDatatable(sql) If DT_CHECKUSER_MODULE.Rows.Count = 0 Then