有人知道这是否可行?除了甚至回忆起发送者和放大器的消息之外,我看不到有关这样做的更多信息。接收方必须使用Exchange,并且必须在接收方端读取电子邮件。很少有这种情况需要这样做,但即使如此,知道也是有用的。
修改
答案 0 :(得分:3)
“召回此消息”的FindControl ID为2511
,因此您可以使用以下代码:
Sub SendRecall()
Dim obj As Object
Dim msg As Outlook.mailItem
Dim insp As Outlook.Inspector
' get selected item
Set obj = ActiveExplorer.Selection.item(1)
If TypeName(obj) = "MailItem" Then
Set msg = obj
Set insp = msg.GetInspector
' execute the command button for "Recall this message"
With insp
.Display
.CommandBars.FindControl(, 2511).Execute
.Close olDiscard
End With
End If
End Sub
在Outlook 2003中运行,您没有发布您的版本,因此我不确定此解决方案是否适合您。