Вопрос : Помощь Кодего VBS

Hi все,

I не имеют искусство необходимы, что завершили мой запрос и я ищу некоторое которое делают для того чтобы помочь me.

I быть спрошенными, что обеспечили все члены групп в списке также, как все доли и что группы и потребители они содержат. Будут значительное количество потребителей и группы поэтому я ищу сценарий для того чтобы упростить process.

I нашел этот сценарий просит название группы быть вписанным работает но я хотел был бы внизу сценарий для того чтобы прочитать архив текста содержит все названия группы в ем и parse каждая группа к архиву текста в вызванную директорию

Essentially, котор C:\Members мне нужен весь выход членов групп к отдельно архиву текста для более последнего review.

Thanks

AI-SYD



Thank вы. class= " ясное " >

> " codeSnippet " class=

class= " lineNumbers "

class=

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20:

id= " codeSnippet939755 " class= " ' сценарий начинает здесь Тусклое objGroup, objUser, objFSO, objFile, strDomain, strGroup, домен, группа 'DomainName изменения к имени домена группа внутри strDomain = Inputbox («впишите имя домена», «данные нужные», «домены невыполнения обязательства имя») 'Измените GroupName к имени группы члены вы хотите ехпортировать strGroup = InputBox («впишите название группы», «данные нужные», «названия группы невыполнения обязательства») Установите objFSO = CreateObject («Scripting.FileSystemObject») 'На следующей линии изменении имя и курс архива ехпортирует данные будут написаны к. Установленное objFile = objFSO.CreateTextFile («C:\» & strGroup &» - Members.txt ") Установите objGroup = GetObject («WinNT: /» & strDomain & «/» & strGroup & «, группа») Для каждого objUser в objGroup.Members objFile.WriteLine objUser.Name & «-» & objUser.Class Затем objFile.Close Установленное objFile = ничего Установите objFSO = ничего Установите objUser = ничего Установите objGroup = ничего «Сделанные» Wscript.Echo Wscript.Echo «пожалуйста проверяют c: для вашего выходного файла»

class=

Ответ : Помощь Кодего VBS

Hi Kenny,

Вы можете использовать GPO для того чтобы приложить статические (позволения ntfs этих же) к a к директориям согласно этому соединению: http://technet.microsoft.com/en-us/library/cc756952(WS.10).aspx

Или наоборот, вы можете использовать SubinACL (часть инструментов поддержки окон для того чтобы найти и заменить позволения): синтаксис обеспеченный здесь: http://www.robvanderwoude.com/subinacl.php