Creates a new role. | |
Syntax: | Set CimRole = object.New ( RoleID ) |
Parameters: |
RoleID As
String - Name of the new
role
|
Description: | CimRoleList.New returns a new CimRole object. This is the method to call to
create a new roles. You must call CimRoleList.Save to save the role to
the project. Examples 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 |