fix typo, rename column, logging

This commit is contained in:
Jonathan Jenne
2023-12-07 09:55:31 +01:00
parent cd23c5b974
commit 752dbe3718
3 changed files with 6 additions and 3 deletions

View File

@@ -23,7 +23,7 @@ Public Class UserModel
Public Function CheckUserLogin(pUser As User) As User
Try
Dim oSql = $"SELECT * FROM [dbo].[FNDD_LOGIN_USER_MODULE] ('{pUser.Username}', 'SIG_PMENV_CR', 1)"
Dim oSql = $"SELECT * FROM [dbo].[FNDD_LOGIN_USER_MODULE] ('{pUser.Username}', 'SIG_ENV_CR', 1)"
Dim oTable As DataTable = Database.GetDatatable(oSql)
If oTable?.Rows.Count = 0 Then