Удаление объекта ACE из списка ACL

[yuv]

windows xp sp3. Не получается удалить объекты ACE из списка ACL.
set sdutil = CreateObject("ADsSecurityUtility")
set sd = sdUtil.GetSecurityDescriptor("a",1,1)
set dacl = sd.DiscretionaryAcl
set ace = CreateObject("AccessControlEntry")
For each ace in dacl
dacl.RemoveAce ace
Next
sd.DiscretionaryAcl = dacl
Руками объекты ACE удаляются из списка ACL.

[Kazun]

Для вступления изменений в силу, требуется использовать метод SetSecurityDescriptor:
sdUtil.SetSecurityDescriptor "c:\specs\adsixml.doc", ADS_PATH_FILE, sd, ADS_SD_FORMAT_IID

[yuv]

sdUtil.SetSecurityDescriptor "c:\specs\adsixml.doc", ADS_PATH_FILE, sd, ADS_SD_FORMAT_IID
Эта строка выполняется 10 секунд. Почему так долго?

[yuv]

Отсутствуют права доступа к ключу реестра. Необходимо установить флажок напротив "Inherit from parent the permission entries that apply to child objects. Include these with entries explicitly defined here.".