fix typo, rename column, logging
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user