[VB] Storagegroups op een Exchange server opvragen

[Verwijderd]

Ik wil een overzicht opvragen van de aanwezige storagegroups in Exchange, met het bijbehorende pad.

Ik heb:
Dim objIExchangeServer As CDOEXM.IExchangeServer
Dim sGroups As Variant
Set sGroups = objIExchangeServer.StorageGroups
Maar hoe nu verder?, en.. is dit een goed begin?

CDO voor Exchange management is geladen in het vb project.

De hele routine is:
Sub Create_Mailbox(varGebruiker)
On Error Resume Next
Dim objUser As IADsUser
Dim objMailbox As CDOEXM.IMailboxStore

xDom = Replace(Text1.Text, ",DC=", "-")
xDom = Replace(xDom, "DC=", "")
s_x4001 = "c=US;a= ;p=" & xDom & ";o=Exchange;s=" & varAchternaam & ";g=" & varVoornaam

errr (Err.Description)
Set objUser = GetObject("LDAP://cn=" & varGebruikersnaam & "," & varUsersOU & "," & varDomain)
Set objMailbox = objUser
errr (Err.Description)

HomeMDB = "LDAP://" & varDomainController & "/" & varExchangeMailboxStore
objMailbox.CreateMailbox (HomeMDB)
errr (Err.Description)
objUser.EmailAddress = varEmail
objUser.SetInfo
objUser.Put "msExchUserAccountControl", 2
objUser.Put "msExchPoliciesExcluded", "{26491CFC-9E50-4857-861B-0CB8DF22B5D7}"
objUser.mailNickname = varGebruikersnaam
objUser.Put "mail", varEmail
objUser.Put "proxyAddresses", Array("SMTP:" & varEmail, "smtp:" & varGebruiker & "@" & varEmaildomein, "smtp:" & varGebruiker & "@" & sDomainstring, "X400:" & s_x4001, "X500:/o=" & varOldExchangeOrg & "/ou=First Administrative Group/cn=Recipients/cn=" & varOrgDienstnummer)
objUser.SetInfo
errr (Err.Description)
End Sub


Hier wil ik dus kunnen bepalen waar ik de mailbox aanmaak.

[Dennis]

Wat is dan eigenlijk je vraag?

[sopsop]

Ken jij MSDN/Google wel? Ik ben hier nog geen 5 seconden mee bezig geweest, waarvan er 4 laadtijd waren.

http://msdn.microsoft.com...age_groups_and_stores.asp

PS: met code tags wordt je topic ook een stuk duidelijker.

[ Voor 36% gewijzigd door sopsop op 10-02-2005 11:30 ]

[Brahiewahiewa]

Je maakt een denkfout: een mailbox wordt niet aangemaakt in een storage group maar in een database; een storage group kan meerdere databases bevatten.

[Verwijderd]

OK, ik heb het gevonden. het was idd te vinden in msdn.
Te term enumerate kon ik even niet opkomen, vandaar dat ik het ook niet kon vinden.
thanks

[sopsop]

Als je in MSDN op "storagegroups" zoekt, is het resultaat 19....