|
ED
|
avaliable
|
RT
|
avaliable
|
Searches for the user with the identification szIdentification
and tries to log him in, if he is not the currently logged in
user.
If a user with thie identification cannot be found, an entry in the
CEL is generated.
Otherwise the user is logged in and the following further
actions are executed:
·System variable for current user level is actualized
·System variable for the name of the current user is actualized
·Alarming is informed about user change
·All opened MDI windows are informed about user change
·CEL entry for user is generated
·UserChange event for the object Passwords is executed
'login a user... Sub LoginUser() Dim bResult As Boolean bResult = zUserAdministration.Login("LogonName") End Sub