Change user password

Examples

Change user password
'Get UserManager.Server object Dim UM:Set UM = CreateObject("UserManager.Server") Dim User 'Add a test user Set User = UM.Users.Add("~TestUser", "1TestPassword") 'Change the user password User.Password = "4SomeOtherPW" Set User = UM.Users("~TestUser") 'Delete the test account User.Delete

  'Get UserManager.Server object
  Dim UM:Set UM = CreateObject("UserManager.Server")
  
  Dim User
  'Add a test user
  Set User = UM.Users.Add("~TestUser", "1TestPassword")
  
  'Change the user password
  User.Password = "4SomeOtherPW"

  Set User = UM.Users("~TestUser")
  'Delete the test account
  User.Delete

UserManager.User

Properties of the user account, and methods for creating, deleting and selecting users.

Easy to use classes to create, delete and manage local and remote user accounts, groups, servers and domains in the Windows NT (2000/XP) environment. Simple work with user accounts and groups from VBA, VBS/JS, ASP and T-SQL.