User Anlage und Gruppenmitgliedschaft per VBS Script

Hi!

Bin auf der Suche nach einer Möglichkeit wie ich

einerseits

-) neue User per VBS Script anlegen und mehreren Gruppenmitgliedschaften definieren

und

-) bestehende Usern die Gruppenmitgliedschaften überprüfen, bzw. wenn Sie diese nicht habem, dann sollen sie automatisch hinzugefügt werden.

Momentan habe ich folgendes Script zur Usererstellung:

Set objOU = GetObject("LDAP://ou=Users,ou=Test,dc=,dc=contoso,dc=intern")
Set objUser = objOU.Create("User", "cn=New User")
objUser.Put "sAMAccountName", "NewUser"
objUser.SetInfo
objUser.Put "userPrincipalName", "NewUser@contoso.intern"
objUser.Put "givenName", "New"
objUser.Put "sn", "User"
objUser.Put "displayName", "New User"
objUser.Put "description", ""
objUser.Put "mail", ""
objUser.Put "c", "AT"
objUser.Put "co", "Austria"
objUser.Put "st", ""
objUser.Put "l", ""
objUser.Put "streetAddress", ""
objUser.AccountDisabled = FALSE
objUser.ChangePassword "", "test123456"
objUser.SetInfo

Allerdings weiß ich leider nicht wie ich jetzt noch eine Gruppenmitgliedschaft definieren kann....

für einen mit Scriptingerfahrung sicher kein Problem