| Users - Collection of user accounts (Domain/Server accounts), (Users property, Collection of domain users.) |
| Users - Collection of user accounts (Domain/Server accounts), (Users property, Collection of User objects from the server.) |
| Add | Adds a user account and assigns a password and privilege level. | |
| SelectServer | Select the server and filter for Users collection |
| ||
'Unlock all user accounts on the local computer
Set Users = CreateObject("UserManager.Users")
For Each User In Users
User.LockOut = False
Next
'Write names of all user accounts
Set Users = CreateObject("UserManager.Users")
Open "AllUsers" For Output As #1
For Each User In Users
Print #1, User.Name, User.FullName, User.UserComment, User.Flags
Next
Close #1 |