在Outlook中捕获复制文件夹命令

Question

我想

1. 在Outlook资源管理器中找到并选择一封电子邮件
2. 右键点击选定的电子邮件，然后将鼠标悬停在＆＃34;移动＆＃34;结果上下文菜单中的选项
3. 在＆＃34; Move＆＃34;的结果子菜单中选项，选择（单击）＆＃34;复制到文件夹＆＃34;选项

4. 在＆＃34;复制项目对话框中，选择一个文件夹并单击＆＃34;确定＆＃34;按钮

   //The example below displays the "Select Folder dialog".
    set Session = CreateObject("Redemption.RDOSession")
   Session.MAPIOBJECT = Application.Session.MAPIOBJECT
   set SelectFoldersDialog = Session.GetSelectFoldersDialog
   if SelectFoldersDialog.Display Then
    set Folder = SelectFoldersDialog.SelectedFolder
   MsgBox "selected folder: " & Folder.Name
   End If
   

   但是我找不到Capture Ok按钮事件的方法。无论如何要捕捉这个事件？

先谢谢

希亚姆

Answer 1

不，没有简单的方法可以在对话框窗口上捕获Ok按钮。 Outlook对象模式（也不是Redemption）不能为此提供任何内容。