What is an Exchange resource mailbox? How do I find them?
Published Jan 08 2019 01:53 PM 115 Views
Microsoft
First published on TECHNET on Mar 11, 2007

What is a resource mailbox ?


·     A resource mailbox is a mailbox that represents conference rooms and company equipment. Resource mailboxes can be included as resources in meeting requests, providing a simple and efficient way to manage the scheduling of resources for your organization.  There are two types of resource mailboxes in Microsoft Exchange Server 2007: room and equipment. Room mailboxes are assigned to a meeting location such as a conference room, auditorium, or training room. Equipment mailboxes are assigned to a resource that is not location specific, such as a portable computer projector, microphone, or company car.


·     Custom resource properties are features for room or equipment mailboxes. Administrators can indicate that a resource has a specific feature by assigning the corresponding custom resource property to that resource mailbox.


·     See http://technet.microsoft.com/en-us/library/aa996338.aspx


For a video demonstration of the exchange rebasing tool please visit http://msexchangeteam.com/archive/2007/02/21/435543.aspx#435553



Script to determine the resource mailboxes in the enterprise: It is attached. please confirm any issues or anything we can assist with.


What does the script (Legdndump) do?


The script interrogates the property named msexchuseraccountcontrol .  The value in case of resource mailboxes is 2; for normal mailboxes, the value is 0.  It provides the legdn of the resource mailboxes. Then use the legDn in the input file for rebasing.



Script



Const Writable       = 2



Set objFSO           = CreateObject("Scripting.FileSystemObject")


Set objLog           = objFSO.OpenTextFile("c:\legdn.txt", Writable, True)


Set cn               = CreateObject("ADODB.Connection")


Set cm               = CreateObject("ADODB.Command")


Set rs               = CreateObject("ADODB.RecordSet")




With cn


.Provider     = "ADsDSOObject"


.Open "Active Directory Provider"


End With



Set cm.ActiveConnection = cn



strDomainDN          = InputBox("Please Enter the Servername and Domain DN. " & vbCrLf & " Example: Myserver/DC=test,DC=lab ")


cm.CommandText = "<LDAP://" & strDomainDN & ">;(&(mailNickName=*)(msExchUserAccountControl=2));legacyExchangeDN;subtree"


cm.Properties("Page Size") = 1000


Set rs               = cm.Execute



While Not rs.EOF


On Error Resume Next


objLog.Write rs.Fields("legacyExchangeDN")


rs.MoveNext


Wend



objLog.Close


msgbox "Export Complete to c:\legdn.txt"


Version history
Last update:
‎Jan 08 2019 01:53 PM
Updated by: