Серый форум — VBScript: создание пользователя в домене

Re: VBScript: создание пользователя в домене

null@example.com (AlistaM) — Wed, 11 May 2011 06:42:49 +0000

ох спасибо, блин больше не буду копипастить, лучше самому набирать

Re: VBScript: создание пользователя в домене

null@example.com (Dmitrii) — Tue, 10 May 2011 07:44:49 +0000

AlistaM пишет:

... выкидывает в ошибку:

такой объект на сервере отсутствует
ошибка 80072030
источник (null)

В имени атрибута userPrincipalName вместо строчной английской "p" стояла русская "р".

Re: VBScript: создание пользователя в домене

null@example.com (AlistaM) — Fri, 06 May 2011 13:29:13 +0000

нет

Re: VBScript: создание пользователя в домене

null@example.com (Dmitrii) — Fri, 06 May 2011 13:04:18 +0000

AlistaM пишет:

изменил немножко код, раньше выскакивал в 1й строке, теперь в 5й...

Разве сообщение об ошибке не изменилось?

Re: VBScript: создание пользователя в домене

null@example.com (AlistaM) — Fri, 06 May 2011 12:43:04 +0000

Set objOU = GetObject("LDAP://OU=911,OU=All_Users,DC=prim,DC=msk,DC=ru")
Set objUser = objOU.Create ("User", "cn=HR_User4")
objUser.Put "SamAccountName", "НR_User4"
objUser.Put "userPrinciрalName", "HR_User4@prim.msk.ru"
objUser.SetPassword "12345dD"
objUser.AccountDisabled = False
objUser.SetInfo

изменил немножко код, раньше выскакивал в 1й строке, теперь в 5й. не понимаю, ему что-то в пароле не нравится?

Re: VBScript: создание пользователя в домене

null@example.com (Dmitrii) — Fri, 06 May 2011 12:39:29 +0000

В какой именно строке возникает ошибка?

VBScript: создание пользователя в домене

null@example.com (AlistaM) — Fri, 06 May 2011 11:22:28 +0000

Добрый день, при попытке создания пользователя в домене через скрипт выкидывает в ошибку:

такой объект на сервере отсутствует
ошибка 80072030
источник (null)

В vbs только разбираюсь, подскажите пожалуйста что я не так делаю?

Set objOU = GetObject("LDAP://OU=All_Users,OU=911,DC=prim,DC=msk,DC=ru")
Set objUser = objOU.Create ("User", "cn=HR_User4")

objUser.Put "SamAccountName", "НR_User4"
objUser.Put "userPrinciрalName", "HR_User4@prim.msk.ru"

objUser.SetInfo

objUser.SetPassword "12345"
objUser.AccountDisabled = False

objUser.SetInfo