Office outlook如何转移conversation folder的邮件

求助Office outlook怎么转移conversation folder的邮件大家应该知道officecommunicator可以存储chat到outlook的conversationfolder，但保存的却是server上的conversationfolder，我想让他自动转移到本地的conversationfolder，就像邮件一样配一个本地的pst，然后选择默认收件箱本地的，则outlook会从server上下载邮件到本地。我想conversationfolder能不能也这么弄？或者设置什么规则让他自动转移？——最佳解决方案——————————————————–

DimsourceFolderAsMAPIFolderDimdestFolderAsMAPIFolderPrivateSubApplication_Startup()Initialize_handlerEndSubPublicSubInitialize_handler()OnErrorResumeNextDimolAppAsOutlook.ApplicationDimnmsNameAsNameSpaceDimfldFolderAsMAPIFolderSetolApp=Outlook.ApplicationSetnmsName=olApp.GetNamespace("MAPI")ForEachfldFolderInnmsName.FoldersForEachsubFolderInfldFolder.FoldersIf(subFolder.Name="ConversationHistory"AndfldFolder.Name="***")ThenSetsourceFolder=subFolderEndIfIf(subFolder.Name="ConversationHistory"AndfldFolder.Name="###")ThenSetdestFolder=subFolderEndIfNextNextSetmyOlItems=sourceFolder.itemsEndSubPrivateSubmyOlItems_ItemAdd(ByValItemAsObject)DimmyOlMItemAsOutlook.mailItemSetmyOlMItem=ItemmyOlMItem.MovedestFolderEndSub

——其他解决方案——————————————————–没人？。。。。。——其他解决方案——————————————————–规则很麻烦。可以用vba，判断MessageClass。——其他解决方案——————————————————–

引用:

规则很麻烦。可以用vba，判断MessageClass。

谢谢版主，那具体怎么做呢？有guide什么的吗？我试试。——其他解决方案——————————————————–http://club.excelhome.net/thread-549121-1-1.html先看看这个，如果还有问题再上来问。——其他解决方案——————————————————–感谢！是否只能以添加按钮方式操作？可以自动化进行吗？——其他解决方案——————————————————–就是自动化进行的啊。——其他解决方案——————————————————–抱歉，试了下，这种类型的不触发newmail事件。我再研究研究。——其他解决方案——————————————————–好，谢谢啊，想不到这么麻烦啊。。。。——其他解决方案——————————————————–把上面代码中的“***”改成server目录的名字。“###”改成本地目录的名字。——其他解决方案——————————————————–再长的路，一步步也能走完，再短的路，不迈开双脚也无法到达。