GetSecurityClassRightsForConnectedUser

Indicates the access rights that the connected user has to a security class.

Syntax

<HsvSecurityAccess>.GetSecurityClassRightsForConnectedUser lSecurityClassID, plAccessRights

Argument	Description
lSecurityClassID	Long (ByVal). The ID of the security class. You can get this ID with GetSecurityClassID.
plAccessRights	Long. Returns a value that indicates the connected user’s access rights to the security class. For a list of constants that represent the valid return values, see Access Rights Constants.

Example

This example tests whether the connected user has All access rights for the Asia security class. GetSecurityClassID assigns the security class ID to the lSecID variable, which is passed to GetSecurityClassRightsForConnectedUser. GetSecurityClassRightsForConnectedUser’s return value is then tested by the If statement: if the user has All access rights, any code placed within the If structure would be executed.

Dim lSecID As Long, lRights As Long
m_cSecurity.GetSecurityClassID "Asia", lSecID
m_cSecurity.GetSecurityClassRightsForConnectedUser lSecID, _ 
lRights
If lRights = HFM_ACCESS_RIGHTS_ALL Then
  …
End If