获取outlook中所有房间的列表

Question

我正在编写一些应用程序，我需要在我的组织内获取所有可用房间。 （我们在 Outlook 中打开“添加房间”对话框时获得的相同列表） 我假设当我们通过 Outlook 执行此操作时，他针对某些交换服务器工作，问题是有没有办法使用 Outlook 作为我与交换服务器之间的“代理”？

我对exchange一窍不通，对outlook的interop有点了解……

提前感谢您的帮助。

Answer 1

我不知道这是否适合您，但是查看带有OutlookSpy 的“所有房间”容器，PR_CONTAINER_FLAGS 属性包含一个未记录的位 0x200。我没有看到为任何其他容器设置了相同的位。 以下内容对您有用吗？

PR_CONTAINER_FLAGS = "http://schemas.microsoft.com/mapi/proptag/0x36000003"
set rooms = Nothing
set lists = Application.Session.AddressLists
for each list in lists
  containerFlags = list.PropertyAccessor.GetProperty(PR_CONTAINER_FLAGS)
  if (containerFlags And &H0200) <> 0 Then
    set rooms = list
    Exit For
  End If
next
if (rooms Is Nothing) Then
  MsgBox "Room container not found"
Else
  MsgBox "Room container was found, its name is " & rooms.Name
  for each room in rooms.AddressEntries
     Debug.Print room.Name & " - " & room.Address
   next
End If