Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > Добавление пользователей в Active Directory


Автор: digorochka 15.1.2007, 16:27
Как с помощью VBscript добавлять новых пользователей с паролями в Activa Directory.
Если кто может подсказать пишите на почту [email protected].

Автор: bom 17.1.2007, 00:29
Вроде бы это. Проверить не на чем  smile
Код

'Creates a user account in Active Directory. This script only creates the account, it does not enable it.

Set objOU = GetObject("LDAP://OU=management,dc=fabrikam,dc=com")
Set objUser = objOU.Create("User", "cn=MyerKen")
objUser.Put "sAMAccountName", "myerken"
objUser.SetInfo

'Changes the password for a user. Requires you to know the user's previous password.

Set objUser = GetObject _
("LDAP://cn=myerken,ou=management,dc=fabrikam,dc=com")
objUser.ChangePassword "", "jl3R86df"


А зачем на мыло то? Может еще кому кроме тебя пригодится.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)