[Exchange 2003] Openbare mappen in kaart brengen

Pagina: 1
Acties:

  • 666AnGeL
  • Registratie: September 2001
  • Laatst online: 17-11-2023
We gebruiken nu tijdelijk de openbare mappen van Exchange om bestanden te delen/etc.
Nu is het de bedoeling dat ik alle rechten van alle mappen ga instellen.
Ik moet uiteraard dus van de baas weten wie waar mag komen , etc.
Nu wil mijn baas graag een overzicht van alle mappen in de openbare mappen.
Ik ben net heel enthousiast begonnen met visio een tekening te maken.
Maar ben er nu maar even mee gestopt.
Er zijn zoveel mappen aangemaakt , dat het uren duurt voordat ik alles netjes heb uitgewerkt.

Nu mijn vraag, is er een programmatje/simpele manier/etc om dus alle mappen/structuur in kaart te brengen?

  • Xandrios
  • Registratie: Februari 2001
  • Laatst online: 16-02 21:14

  • jwpmzijl
  • Registratie: December 2002
  • Laatst online: 17:00
Je kunt via een VBA macro recursief alle mappen ophalen. Tja vergt enige programmeerkennis. Onderstaand fragment laat in een pop-up de verschillende stores zien maar dat moet je dan uitbreiden met code om binnen de store "Openbare mappen" alle submappen te tonen.

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub EnumStoresCDO()
Dim objsession As Session
Dim objstore As InfoStore
Dim strmsg As String

Set objsession = CreateObject("MAPI.Session")
objsession.Logon , , False, False
strmsg = " "
For Each objstore In objsession.InfoStores
    strmsg = strmsg & objstore.Name & " (" & objstore.ProviderName & ")" & vbCrLf
Next

MsgBox strmsg
    
End Sub

Hans van Zijl


Verwijderd

Kijk eens of pfdavadmin doet wat je wil:
http://hellomate.typepad....3/10/the_pfdavadmin_.html