check user login

2023-12-07 09:35:23 +01:00
parent 1108fa47e0
commit cd23c5b974
4 changed files with 62 additions and 17 deletions
--- a/EnvelopeGenerator.Common/Models/ConfigModel.vb
+++ b/EnvelopeGenerator.Common/Models/ConfigModel.vb
@@ -27,15 +27,7 @@ Public Class ConfigModel
        End Try
    End Function

-    Public Function GetUserId() As Integer
-        Try
-            Dim oUserId As Integer = Database.GetScalarValue($"SELECT GUID FROM TBDD_USER WHERE USERNAME = '{Environment.UserName}'")
-            Return oUserId

-        Catch ex As Exception
-            Return 0
-        End Try
-    End Function


 End Class