VBScript: read Exchange 2003 mailbox permissions - Identity Management | Tools4ever
VBScript: read Exchange 2003 mailbox permissions

VBScript: read Exchange 2003 mailbox permissions

Door: Arnout van der Vorst

Some time ago I made a VBScript to read the Exchange mailbox permissions, as stored in the msExchMailboxSecurityDescriptor property of a user object. This time the script is more targeted towards reading which user account have full mailbox access, and exporting them to a CSV file:
strUserODN = wscript.arguments(0)
strOutput = wscript.arguments(1)
strDomainController = wscript.arguments(2)
Const RIGHT_DS_DELETE = &H10000
Const RIGHT_DS_READ = &H20000
Const RIGHT_DS_CHANGE = &H40000
Const RIGHT_DS_TAKE_OWNERSHIP = &H80000
Const RIGHT_DS_MAILBOX_OWNER = &H1
Const RIGHT_DS_SEND_AS = &H2
Const RIGHT_DS_PRIMARY_OWNER = &H4< Const ADS_ACETYPE_ACCESS_ALLOWED = &H0 Const ADS_ACETYPE_ACCESS_DENIED = &H1 set fso = CreateObject(“Scripting.FileSystemObject”) set csvOutput = fso.CreateTextFile(strOutput, true) Set objSdUtil = GetObject(“LDAP://” & strDomainController & “/” & strUserODN & “”)  Set objsd = objSdUtil.Get(“msExchMailboxSecurityDescriptor”) Set objDACL = objsd.DiscretionaryAcl For Each objACE in objDACL if (objACE.AccessMask and RIGHT_DS_MAILBOX_OWNER) then  if (objACE.AccessMask and RIGHT_DS_READ) then csvOutput.WriteLine objAce.Trustee end if end if Next

Arnout van der Vorst

Geschreven door:
Arnout van der Vorst

Maak kennis met Arnout van der Vorst, de inspirerende Identity Management Architect bij Tools4ever sinds het jaar 2000. Na zijn studie Hogere Informatica aan de Hogeschool van Utrecht is hij begonnen als Supportmedewerker bij Tools4ever. Daarna heeft Arnout zich opgewerkt tot een sleutelfiguur in het bedrijf.  Zijn bijdragen strekken zich uit van klantondersteuning tot strategische pre-sales activiteiten, en hij deelt zijn kennis via webinars en artikelen.

Anderen bekeken ook

De vooroordelen van Single Sign On

De vooroordelen van Single Sign On

29 november 2011

SAP koppeling met Active Directory

SAP koppeling met Active Directory

06 september 2012

RBAC: sleutelrol, beheer en evolutie

RBAC: sleutelrol, beheer en evolutie

15 maart 2011

User- en toegangsbeheer in cloud applicaties: een uitdaging

User- en toegangsbeheer in cloud applicaties: een uitdaging

04 september 2012