Maarten,
Did you ever get this to work?
I have been unable to access any public folders.
Thanks.
Hal
> When I want to access a particular folder(Leveranciers) in the Public
> Folders some of the mailboxnames give an error (MAPI_E_UNCONFIGURED).
> There is nothing wrong with the rights of these mailboxes and they have
> worked for some time; the code I have used is the following:
>
> <% bstrServer="exchange"
> bstrMailbox="some mailbox"
>
> Set objSession=Server.CreateObject("MAPI.Session")
> bstrProfileInfo=bstrServer+vbLF+bstrMailbox
> objSession.Logon "","",False,True,0,True,bstrProfileInfo
> Set objInfoStores=objSession.InfoStores
> Set objInfoStore=objInfoStores.Item("Public Folders")
> bstrRootPublicID=objInfoStore.Fields.Item(&H66310102)
> Set objPublicFolder=objSession.GetFolder
> (bstrRootPublicID,objInfoStore.ID)
> Set objLeveranciers=objPublicFolder.Folders.Item("Leveranciers")
>
> %>