IMetabaseUser.Stations

Syntax

Stations: IStations;

Description

The Stations property returns the collection containing the list of workstations, from which user access is granted.

Example

To execute the example, make sure that security manager contains the USER user.

Add a link to the Metabase system assembly.

Sub UserProc;
Var
    MB: IMetabase;
    MS: IMetabaseSecurity;
    User: IMetabaseUser;
    DM: IDomain;
    Lic: Object;
Begin
    MB := MetabaseClass.Active;
    // Check out license to work with security manager
    Lic := MB.RequestLicense(UiLicenseFeatureType.Adm);
    MS := MB.Security;
    // Set allowed workstation
    User := MS.ResolveName("USER") As IMetabaseUser;
    DM := User.Stations.Domains.Add("GROUP");
    DM.Stations.Add("1C");
    // Save changes
    MS.Apply;
    // Check in license
    Lic := Null;
End Sub UserProc;

After executing the example, the USER user is allowed to access only from the 1C workstation located in the GROUP domain. By default, the user is allowed to access the system from any workstations, IP and MAC addresses.

See also:

IMetabaseUser