返回 Microsoft Exchange 2003 日程间隔信息。
Visual Basic
On Error Resume Next
strComputer = “.”
Set objWMIService = GetObject(“winmgmts:” _
& “{impersonationLevel=impersonate}!\\” & strComputer & _
“\ROOT\MicrosoftExchangeV2″)
Set colItems = objWMIService.ExecQuery _
(“Select * from Exchange_ScheduleInterval”)
For Each objItem in colItems
Wscript.Echo “Start time: ” & objItem.StartTime
Wscript.Echo “Stop time: ” & objItem.StopTime
Wscript.Echo
Next
Latest posts by Exchange中文站 (see all)
- 微软将推出卫星解决方案:可连接到 Azure 云服务 - 2020年9月17日
- Windows Terminal 1.0正式发布 - 2020年5月25日
- Azure Lighthouse 相关介绍 - 2020年3月2日
发布于:
浏览:1388 次
还没有评论