MOTOBIT.COM - ASP upload, IIS utility Some actions must be done only on primary DC.

Set Server = CreateObject("UserManager.Server")
Server.Select "DOMAIN_SERVER"
If Server.Type & stDOMAIN_CTRL > 0 Then
  Set User = Server.Users.Add("Coll", "Password")
End If

UserManager.Server

Properties of servers, enumerating users, logon/logoff to the user administrator account.

UserManager

ActiveX UserManager is easy to use COM component with classes to create, delete and manage local and remote user accounts, groups, servers and domains in the Windows NT (2000/XP) environment. You can simple work with user accounts and groups from VBA, VBS/JS, ASP and T-SQL programming environment.