将多封邮件移动到不同商店的文件夹中
Move multiple mails to a folder in a different store
我正在为我的 Outlook 加载项使用 Outlook Redemption 库 (http://www.dimastr.com/redemption/home.htm)。我想将多个邮件从交换帐户移动到 PST 存储。
onlineAccountFolder.Items.MoveMultiple(onlineEntryIds, targetFolderInPstStore);
源文件夹邮件是从 Exchange 帐户中剪切的,但没有粘贴到目标文件夹中。他们走了。
我在同一商店的Exchange 帐户文件夹上尝试了相同的操作,并且移动操作成功。项目已移至目标文件夹。
'MoveMultiple' 方法没有重载,我可以在其中定义 StoreID。
使用 RDOMail class 的 Move
方法在 Outlook 中的商店之间移动项目。
我从 OutlookSpy 执行以下脚本没有问题(我是它的作者 - 单击 OutlookSpy 工具栏上的“脚本编辑器”按钮,粘贴脚本,单击 运行。
该脚本将在 Outlook 中选择的邮件移动到 PickFolder
方法返回的文件夹中。与 PST 和 Exchange 目标文件夹一起按预期工作。
set Session = CreateObject("Redemption.RDOSession")
Session.MAPIOBJECT = Application.Session.MAPIOBJECT
dim messages()
set sel = Application.ActiveExplorer.Selection
redim messages(sel.Count-1)
for i = 1 to sel.Count
messages(i-1) = sel.Item(i).EntryID
next
set targetFolder = Session.PickFolder
set sourceFolder = Session.GetFolderFromID(Application.ActiveExplorer.CurrentFolder.EntryID)
sourceFolder.Items.MoveMultiple messages, targetFolder
我正在为我的 Outlook 加载项使用 Outlook Redemption 库 (http://www.dimastr.com/redemption/home.htm)。我想将多个邮件从交换帐户移动到 PST 存储。
onlineAccountFolder.Items.MoveMultiple(onlineEntryIds, targetFolderInPstStore);
源文件夹邮件是从 Exchange 帐户中剪切的,但没有粘贴到目标文件夹中。他们走了。
我在同一商店的Exchange 帐户文件夹上尝试了相同的操作,并且移动操作成功。项目已移至目标文件夹。
'MoveMultiple' 方法没有重载,我可以在其中定义 StoreID。
使用 RDOMail class 的 Move
方法在 Outlook 中的商店之间移动项目。
我从 OutlookSpy 执行以下脚本没有问题(我是它的作者 - 单击 OutlookSpy 工具栏上的“脚本编辑器”按钮,粘贴脚本,单击 运行。
该脚本将在 Outlook 中选择的邮件移动到 PickFolder
方法返回的文件夹中。与 PST 和 Exchange 目标文件夹一起按预期工作。
set Session = CreateObject("Redemption.RDOSession")
Session.MAPIOBJECT = Application.Session.MAPIOBJECT
dim messages()
set sel = Application.ActiveExplorer.Selection
redim messages(sel.Count-1)
for i = 1 to sel.Count
messages(i-1) = sel.Item(i).EntryID
next
set targetFolder = Session.PickFolder
set sourceFolder = Session.GetFolderFromID(Application.ActiveExplorer.CurrentFolder.EntryID)
sourceFolder.Items.MoveMultiple messages, targetFolder