LastLoginStamp: DateTime;
LastLoginStamp: System.DateTime;
Свойство LastLoginStamp возвращает дату последнего входа в систему.
Дата входа меняется и при удачном (всегда) и при неудачном входе (если корректно настроен пользователь «p4audit»).
Для выполнения примера убедитесь, что в менеджере безопасности содержится пользователь USER.
Добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
User: IMetabaseUser;
Begin
MB := MetabaseClass.Active;
MS := MB.Security;
User := MS.ResolveName("USER") As IMetabaseUser;
Debug.WriteLine(User.LastLoginStamp);
End Sub UserProc;
Imports Prognoz.Platform.Interop.Metabase;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
MS: IMetabaseSecurity;
User: IMetabaseUser;
Begin
MB := Params.Metabase;
MS := MB.Security;
User := MS.ResolveName("USER") As IMetabaseUser;
System.Diagnostics.Debug.WriteLine(User.LastLoginStamp);
End Sub;
После выполнения примера в консоль будет выведена дата и время последнего входа пользователя USER.
См. также: