Hi,

I have the following problem:
When I create a user in AD and create a mailbox for that user, I need to
assign additional user's to the mailbox's permissions list.

This is my code:

Set ace=createObject("AccessControlEntry")
ace.Trustee="domain\userid"
ace.AceType = 0
ace.AceFlags = 2
ace.AccessMask = 1 'full mailbox access

'objPerson is a mailbox enabled account in AD
Set sd=objPerson.msExchMailboxSecurityDescriptor
Set dacl = sd.DiscretionaryAcl
dacl.AddAce ace

sd.DiscretionaryAcl=dacl
objPerson.Put "msExchMailboxSecurityDescriptor", Array(sd)

objPerson.SetInfo

This works finewhen the mailbox is on Exchange 5.5 server and the account
shows up on the mailbox permissions list about 5 min after I ran the code,
but if the mailbox  is on Exchange 2000 server then the account doesn't show
up in mailbox permissions although I can see that its in the
msExchMailboxSecurityDescriptor attribute in AD.
What am I doing wrong? The there an extra step for Exchange 2000 mailbox?

Thank you,
John Mirochnik
phone: 617-563-4984
email: [EMAIL PROTECTED]

List info   : http://www.activedir.org/mail_list.htm
List FAQ    : http://www.activedir.org/list_faq.htm
List archive: http://www.mail-archive.com/activedir%40mail.activedir.org/

Reply via email to