[C#/Active Directory] Mailbox aanmaken lukt niet

[TweakersOnly]

Ik wil door middel van een C# webservice een user + mailbox aanmaken in Active Directory en Exchange 2003. De user kan ik zonder problemen aanmaken, echter bij het aanmaken van een mailbox voor de nieuwe user krijg ik de foutmelding Access denied.

Mijn code:

C#:

CDOEXM.IMailboxStore _mailbox = (IMailboxStore)directoryEntryNewStudent.NativeObject;
_mailbox.CreateMailbox(ConfigurationSettings.AppSettings.Get("CreateMailboxSyntax"));

De CreatemailboxSyntax is opgenomen in de web.config en moet correct zijn, in een ASP-applicatie kan met deze syntaxt wel een object worden aangemaakt, zie de volgende code

ASP.NET Visual Basic:

Set objMailbox = Server.CreateObject( "CDOEXM.MailboxStoreDB" )
set objMailbox = objExchangeUser
objMailbox.CreateMailbox CreateMailboxSyntax
objExchangeUser.SetInfo

Ik heb via google veel topics over bovenstaand probleem gevonden, ook Microsoft maakt hier melding van: http://support.microsoft....aspx?scid=kb;en-us;317234. Echter ik heb nog geen oplossing kunnen vinden.

[TweakersOnly]

Voor de geinteresseerden onder ons: Ik heb via een omweg alsnog de mailboxen kunnen creeren. Ik heb op de Exchange-server een ASP-pagina gmaakt, waarmee ik de mailboxen kan aanmaken. Deze ASP-pagina roep ik vervolgens van mijn ASP.NET project aan. Geen mooie oplossing, maar voorlopig wel werkbaar.

Hieronder de code om in ASP mailboxen aan te maken voor gebruikers en emailadressen te koppelen aan distributielijsten.

ASP:

if (intObjecttype = OBJECTTYPE_USER) then
 
    'Bij users moet een nieuwe mailbox worden aangemaakt 
    Set objMailbox = Server.CreateObject( "CDOEXM.MailboxStoreDB" ) 
    set objMailbox = objExchangeUser objMailbox.CreateMailbox stringHomeMDB 
    objExchangeUser.SetInfo 

    'Zet het juiste emailadres vast 
    objExchangeUser.put "ProxyAddresses", "SMTP:[e-mail]" 

    'POP3 uitschakelen 
    objExchangeUser.put "ProtocolSettings", "POP3§0§1§4§ISO-8859-1§0§§§" 

    objExchangeUser.msExchUserAccountControl = 2 
    objExchangeUser.SetInfo 
else 
    'Bij distributielijsten moet alleen een emailadres worden aangemaakt 
    dim objRecipients 
    Set objRecipients = objExchangeUser 
    objRecipients.MailEnable 
    objExchangeUser.SetInfo 

    'Zet het juiste emailadres 
    objExchangeUser.put "ProxyAddresses", "SMTP:[e-mail]" 

    objExchangeUser.msExchUserAccountControl = 2 
    objExchangeUser.SetInfo 
end if