Hello,
Please help me with 2 tasks.
1.
When execute this script, Folders were creating successfully with comman name and domain but I need create only with "CN"
eg:"CN=Astra,OU=aaa,OU=bbb,OU=ccc,DC=ddd,DC=com"
I need to create folder in the name of Astra
Script:
On Error Resume Next
Dim objFSO, objFolder
Set objGroup = GetObject _
("LDAP://cn=UserCreation,ou=aaa,ou=bbb,ou=ccc,dc=ddd,dc=com")
objGroup.GetInfo
arrMemberOf = objGroup.GetEx("member")
WScript.Echo "Members:"
For Each strMember in arrMemberOf
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder(strMember)
Next
2. Please help me to set user permission to appropriate folder.
Thanks!
Bookmarks