返回所有邮箱的总大小

返回在 Exchange 服务器上的所有邮箱的总大小。、
Visual Basic
‘ Test : OK
Dim TailleTotale
TailleTotale = 0
strComputer = “.”
Set objWMIService = GetObject(“winmgmts:\\” & strComputer & “\root\MicrosoftExchangeV2″)
Set colItems = objWMIService.ExecQuery( _
“SELECT * FROM Exchange_Mailbox”,,48)
For Each objItem in colItems
TailleTotale = TailleTotale + objItem.Size
Next
TailleTotale = Round (TailleTotale / 1024,2)
WScript.Echo “Total size : “&TailleTotale&” MO.”

• 作者
• 最近文章

Exchange中文站

Exchange中文站是一个专注讨论 Microsoft Exchange Server / Exchange Online / Office 365 的技术型网站。

Exchange中文站 的最新文章 (查看所有)

• Exchange 2019 的新特性 - 2019年4月8日
• Office 365 和 Office 2019 的区别是什么 - 2019年4月8日
• Exchange各版本2019年第一个更新补丁已经发布 - 2019年2月15日