IStations.Access

Syntax

Description

The Access property determines an access type for the stations from the collection.

Example

Sub UserProc;
Var
    MB: IMetabase;
    Sec: IMetabaseSecurity;
    User: IMetabaseUser;
    Stations: IStations;
Begin
    MB := MetabaseClass.Active;
    Sec := MB.Security;
    User := Sec.ResolveName("ADMIN") As IMetabaseUser;
    Stations := User.Stations;
    Debug.WriteLine(Stations.Access);
End Sub UserProc;

After executing the example the development environment console displays the value that determines the access type for the workstations from the collection of the ADMIN user.