Пишу вот так:

Dim DSO As IADsOpenDSObject
Set DSO = GetObject("LDAP:")

Dim myOU As String
myOU = "LDAP://domainControllerName.domainName.local/OU=myOU,DC=domainName,DC=local"

Dim Container As IADsContainer
Set Container = DSO.OpenDSObject(myOU, "name", "pass", 0)

Dim Group As IADsGroup
Set Group = Container .Create("group", "groupName")
Group.SetInfo

Вылетаю на последней строчке "Auotomation error. The server is unwilling to process to request"
Кто знает как исправить ситуэйшн?