CimRoleList.Save (method)

Saves the role
Syntax: object.Save role, bDynamic
role As CimRole - Role object to be saved.
bDynamic As BOOL - Save dynamically.
Description: CimRoleList.Save saves a CimRole to the project.


Dim project As CimProject
Set project = CreateObject("CimProject")
project.OpenLocalProject "d:\classes\classes.gef"
Dim roles As CimRoleList
Dim role As cimRole
Set roles = project.Roles
Set role = roles.New("TECH")
role.PrivSetpoint = TRUE
roles.Save role, False