Изменение пользователей в Active Directory

Я изменил (чтобы прокрутить много пользователей) скрипт от this MS website, чтобы добавить пользователей в группу в AD, но на этой странице не говорится, как что-то делать.Изменение пользователей в Active Directory

Const ADS_PROPERTY_APPEND = 3 
Set objGroup = GetObject _ 
("LDAP://cn=Atl-Users,ou=HR,dc=NA,dc=fabrikam,dc=com") 

objGroup.PutEx ADS_PROPERTY_APPEND, _ 
"member", Array("cn=YoungRob,ou=R&D,dc=NA,dc=fabrikam,dc=com") 

objGroup.SetInfo

Где я могу добавить и то, что код для проверки, если они уже имеют эту группу, и если они делают их пропустить и просто сказать что-то вроде wscript.echo "yeah they got this already" + UserName.

источник

2013-09-06 Pavle Stojanovic

Что-то, как это должно работать:

Const ADS_PROPERTY_APPEND = 3 

dn = "cn=YoungRob,ou=R&D,dc=NA,dc=fabrikam,dc=com" 

isMember = False 

'check regular group memberships 
For Each m In objGroup.GetEx("member") 
    If LCase(m) = LCase(dn) Then 
    isMember = True 
    Exit For 
    End If 
Next 

'check primary group 
primaryGroupID = GetObject(dn).Get("primaryGroupID") 
objGroup.GetInfoEx Array("primaryGroupToken"), 0 
If primaryGroupID = objGroup.Get("primaryGroupToken") Then isMember = True 

If Not isMember Then objGroup.PutEx ADS_PROPERTY_APPEND, "member", Array(dn)

источник

2013-09-06 11:05:13

Благодаря Ansgar дам это идти в понедельник :) ... Я вижу ваше имя везде здесь вы должны быть великим программистом/скриптером? –

Просто скромный системный администратор. –

Это немного не по теме, но по-прежнему актуальным в некотором роде. .. в командной строке программы I.e. ping вы можете использовать /? После этого, чтобы получить ключи и что еще вы можете использовать для этого .. вы можете сделать это в vbscript? –

Изменение пользователей в Active Directory

ответ

Смежные вопросы