OfflineModus
This commit is contained in:
@@ -12,7 +12,7 @@ Public Class Login
|
||||
Class1.DebugText = LDAP
|
||||
' Class1.DebugText &= Environment.UserDomainName & vbCrLf
|
||||
'Class1.DebugText &= ReturnLDAP(Environment.UserDomainName) & vbCrLf
|
||||
Class1.CheckDebug()
|
||||
Class1.CheckDebug(True)
|
||||
Try
|
||||
userPrincipalName = System.DirectoryServices.AccountManagement.UserPrincipal.Current.UserPrincipalName
|
||||
Catch ex As Exception
|
||||
|
||||
Reference in New Issue
Block a user