2

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

我对exchange一无所知,对outlook的互操作有一点了解...

提前感谢您的帮助。

4

1 回答 1

0

我不知道这是否对您有用,但是查看带有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
于 2013-02-13T20:51:16.893 回答