Vb6 阅读Outlook 2003中更新的邮件正文

Vb6 阅读Outlook 2003中更新的邮件正文,vb6,outlook-2003,outlook-redemption,Vb6,Outlook 2003,Outlook Redemption,我有一个使用赎回库的应用程序。用户可以打开会议并为取消添加一些注释。在编辑之前,消息正文已经设置了一些默认文本。是否有办法在邮件打开后和发送前获取新的更新邮件正文?使用 safeItem.Body 如果safeItem是SafeAppointmentItem,则来自赎回的项目似乎不起作用。任何帮助都将不胜感激 更新: 如果我将呼叫更改为: Set app = Outlook.Application Set bodyText = app.ActiveInspector.CurrentItem.B

我有一个使用赎回库的应用程序。用户可以打开会议并为取消添加一些注释。在编辑之前,消息正文已经设置了一些默认文本。是否有办法在邮件打开后和发送前获取新的更新邮件正文?使用

safeItem.Body
如果safeItem是SafeAppointmentItem,则来自赎回的项目似乎不起作用。任何帮助都将不胜感激

更新:

如果我将呼叫更改为:

Set app = Outlook.Application
Set bodyText = app.ActiveInspector.CurrentItem.Body

它的工作,但我得到一个警告弹出,这是不可接受的

我找到了答案。呼叫

safeItem.save
将更新item.body