Set Users = CreateObject("UserManager.Users") Users.Item("Administrator").FullName = "Default administrator account."