'------------------------------------------------------------
' Add New Domain User to NTFS ACL of D:\MyFolder
'------------------------------------------------------------
If fso.FolderExists("D:\MyFolder") then
wscript.stdout.write clear_line & "Modify ACL of D:\MyFolder Directory..."
WshShell.run "cacls D:\MyFolder /G " & strNewDomain & "\" & strUserName & ":F /C /E /T",0,true
End If
'------------------------------------------------------------
' Add New Domain User to NTFS ACL of all of C Drive folders ' except - Documents and Settings, Program files, WINDOWS
'------------------------------------------------------------
...code here...
|