CimUserList.Save (method)

Saves the user
Syntax: object.Save role, bDynamic
role As CimUser - user to be saved.
bDynamic As BOOL - Save dynamically.
Description: CimUserList.Save saves a CimUser to the project.


Dim project As CimProject
Set project = CreateObject("CimProject")
project.OpenLocalProject "d:\classes\classes.gef"
Dim users As CimUserList
Set users = project.Users
Dim user As CimUser
Set user = users.New("JSMITH")
user.RoleID = "OPER"
user.PasswordNeeded = True
user.Password = "JIM"
user.Enabled = True
user.PasswordExpiresDays = 0
user.UserName = "John Smith"
users.Save user, False