Анализ почтового ящика Exchange

В Exchange Server 2003 нет ничего, что могло бы предоставить вам необходимую информацию, но существует целая отрасль, построенная вокруг управления Exchange и отчетности. Это только один из доступных инструментов:

http://www.manageengine.com/products/exchange-reports/features.html

Фактически, вы можете получить часть этой информации через WMI.

Вот пример на Perl, который я собрал для той же цели:

#! /usr/bin/env perl

use strict;
use warnings;
use Win32::OLE('in');

use constant wbemFlagReturnImmediately => 0x10;
use constant wbemFlagForwardOnly => 0x20;

print "Mailbox,Size (KB),Total Items,Last Logon Time,Last User\n";

my @computers = qw ( mailserver1 mailserver2 etc);  #array off all mail servers, separated by spaces
foreach my $computer (@computers) {
    my $objWMIService = Win32::OLE->GetObject("winmgmts:\\\\$computer\\root\\MicrosoftExchangeV2") or die "WMI connection failed.\n";
    my $colItems = $objWMIService->ExecQuery("SELECT * FROM Exchange_Mailbox", "WQL",
            wbemFlagReturnImmediately | wbemFlagForwardOnly);

    foreach my $objItem (in $colItems) {
        my $mailboxDisplayName = $objItem->{MailboxDisplayName} || "NULL";
        my $size = $objItem->{Size} || "NULL";
        my $totalItems = $objItem->{TotalItems} || "NULL";
        my $lastLogonTime = substr($objItem->{LastLogonTime},0,8) || "NULL";
        my $lastUser = $objItem->{LastLoggedOnUserAccount} || "NULL";

        #next unless $mailboxDisplayName;
        print "$mailboxDisplayName,$size,$totalItems,$lastLogonTime,$lastUser\n";
    }
}

Вам нужен установленный perl и модуль Win32 :: OLE, но это довольно просто. Запустите его из командной строки, выполнив perl scriptname.pl , и выполните запись в файл .csv, запустив perl scriptname.pl> report.csv

Этот класс WMI не может вас понять Информация о вложении, но может дать вам количество сообщений и размер почтового ящика.