Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Exchange Mailbox Report

Frage Entwicklung Batch & Shell

Mitglied: HilFi2000

HilFi2000 (Level 1) - Jetzt verbinden

30.07.2008 um 14:27 Uhr, 2555 Aufrufe

Hallo Admins,

ich habe ein Script, das mir die Mailboxgrößen all User einer bestimmten OU ausgibt.
Zum Vergleich verwende ich den DisplayName bzw. MailboxDisplayName. Da in einer größeren Struktur Namen doppelt vorkommen können, ist es nicht sehr eindeutig.
Ich möchte am liebsten CN verwenden. Wie müsste ich das Script umbauen?


Script----



Dim SWBemlocator
Dim objWMIService
Dim colItems
Dim objFSO
Dim objFile
Dim strOU

strComputer = "Mailserver3" 'Computername (Mailserver)
UserName = ""
Password = ""
strLog="\\filesserver\c$\REPORT\MailboxReport.txt" 'Dateipfad und Name


'Reportdatei anlegen
Set objFSO=CreateObject("Scripting.FileSystemObject")
Set objFile=objFSO.CreateTextFile(strLog,True)
objFile.WriteLine "Storename; MailboxDisplayName;CN; Size(KB);"

Call SubReport("Berlin")

'Reportdatei schließen
objFile.close



Sub SubReport (strOU)
Set objOU = GetObject ("LDAP://OU=" & strOU & ",OU=GMD,OU=Domain Users,DC=test,DC=de")
Set SWBemlocator = CreateObject("WbemScripting.SWbemLocator")
Set objWMIServiceExchange = SWBemlocator.ConnectServer(strComputer,"\root\MicrosoftExchangeV2",UserName,Password)


strQuery="Select * from Exchange_Mailbox"

For Each objUser in objOU
Set colItemsExchange = objWMIServiceExchange.ExecQuery(strQuery,,48)
For Each objItemExchange in colItemsExchange
If objUser.DisplayName = objItemExchange.MailboxDisplayName Then
If objUser.AccountDisabled = false Then
objFile.writeline objItemExchange.StoreName & ";" & objItemExchange.MailboxDisplayName & ";" _
& objUser.CN & ";" & objItemExchange.Size



End If
End If
Next
NEXT

End Sub



--- Ende ----


Wie müsste die Prüfung "If objUser.DisplayName = objItemExchange.MailboxDisplayName Then" geändert werden??

Oder habt ihr einen besseren Vorschlag?

Vielen Dank!
Neuester Wissensbeitrag
Microsoft Office

MS Office Excel - Formel wird angezeigt, aber nicht berechneter Wert!

Tipp von holli.zimmi zum Thema Microsoft Office ...

Ähnliche Inhalte
Exchange Server
How to recover Exchange mailbox folder for FREE

Link von Herbrich19 zum Thema Exchange Server ...

Exchange Server
gelöst Lizenzierung Exchange Mailbox Server und Exchange Edge Server (2)

Frage von DarkLevi zum Thema Exchange Server ...

Exchange Server
gelöst Exchange 2016 Mailbox aktivieren und vorhandene Mailadresse aus AD übernehmen (3)

Frage von chrismass zum Thema Exchange Server ...

Exchange Server
Exchange 2016 CU2 Shared Mailbox Default Send Account (1)

Frage von coon91 zum Thema Exchange Server ...

Heiß diskutierte Inhalte
Hyper-V
gelöst Reiner Hyper- V Server oder lieber Rolle (19)

Frage von Winuser zum Thema Hyper-V ...

Windows Server
gelöst Rechte als Admin vergeben - Zugriff verweigert (14)

Frage von Ghost108 zum Thema Windows Server ...

Router & Routing
gelöst IP Kamera für drei unabhängige Netzwerke (14)

Frage von ProfessorZ zum Thema Router & Routing ...

SAN, NAS, DAS
gelöst Synology Version 6.1 Probleme (13)

Frage von Hendrik2586 zum Thema SAN, NAS, DAS ...