LogonUser sample

Examples

LogonUser sample
Dim Server, User Set Server = CreateObject("UserManager.Server") Server.LogonUser "Administrator", "" 'Create a new user Set User = Server.Users.Add("NewUser", "UserPassword") 'Add the new user to the group User.AddToLocalGroup "Guests" 'Logon new user Server.LogonUser "NewUser", "UserPassword" 'Some other operations under new user account Server.RevertToSelf

LogonUser sample

Dim Server, User

Set Server = CreateObject("UserManager.Server")

Server.LogonUser "Administrator", ""
'Create a new user
Set User = Server.Users.Add("NewUser", "UserPassword")
'Add the new user to the group
User.AddToLocalGroup "Guests"
'Logon new user
Server.LogonUser "NewUser", "UserPassword"
'Some other operations under new user account

Server.RevertToSelf

UserManager.Server

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

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.