Подскажите, плз как на скрипте разрешить доступ юзеру к папке (не шара!)?..
Пример:
Код:
Dim FSO, TheFile, Line, objFSO, objFolder
set FSO=CreateObject("Scripting.FileSystemObject")
set obj=GetObject("LDAP://cn=users,dc=domen,dc=com")
set TheFile= FSO.OpenTextFile("users.txt")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Do while NOT TheFile.AtEndOfStream
Line=TheFile.ReadLine
set usr=obj.Create("user", Line)
usr.SetInfo
usr.setpassword="123456"
usr.SetInfo
Set objFolder = objFSO.CreateFolder("C:\" & Line)
'И вот тут мне нужно пользователю Line
'разрешить доступ на запись/чтение к папке Line
Loop
Help!
