Oulook脚本 - 如何找到最喜欢的文件夹的根文件夹

我想找到一种方法来访问最喜欢的文件夹的关联公用文件夹。目标是将邮件自动移动到公共文件夹。在这个文件夹被定义为收藏夹的情况下，我想将邮件移动到这个收藏夹来解决性能问题。Oulook脚本 - 如何找到最喜欢的文件夹的根文件夹

相关的公用文件夹路径在收藏夹文件夹属性的Outlook中是可见的（右键单击文件夹，然后属性/摘要：公共文件夹的路径显示在那里），但我找不到访问信息编程...

我真的很感谢你的帮助！

非常感谢，

纪尧姆

2013-05-01 user2341018

我已经使用EWS使用ExtendedPropertyDefinition

new ExtendedPropertyDefinition(0x7C02, MapiPropertyType.Binary);

将其转换为一个条目ID应该把你带到正确的公共文件夹访问PR_FAV_PUBLIC_SOURCE_KEY。详情：http://social.technet.microsoft.com/Forums/de-DE/exchangesvrdevelopmentlegacy/thread/e75940c6-b53b-4260-b12c-6541e4ff8a69

还有更多喜爱的特定属性，如：

private ExtendedPropertyDefinition eProp_LevelMask = new ExtendedPropertyDefinition(0x7D03, MapiPropertyType.Integer); 
    private ExtendedPropertyDefinition eProp_ShortcutType = new ExtendedPropertyDefinition(0x7D09, MapiPropertyType.String); 
    private ExtendedPropertyDefinition eProp_FavParent = new ExtendedPropertyDefinition(0x7D02, MapiPropertyType.Binary);

和

private ExtendedPropertyDefinition eProp_ShortcutName = new ExtendedPropertyDefinition(0x7C00, MapiPropertyType.String); 
    private ExtendedPropertyDefinition eProp_ShortcutAlias = new ExtendedPropertyDefinition(0x7C01, MapiPropertyType.String);

来源

2013-05-06 14:05:07

非常感谢您对您的帮帮我。我是一名初学者，我在VBA中编写脚本。这段代码是C对吗？你知道如何在visual basic中编写脚本吗？谢谢 – user2341018 2013-05-07 18:50:05

对不起，对EWS和VBA不太了解。但你仍然可以通过PropertyAccessor访问扩展属性我猜...更多细节：http://msdn.microsoft.com/de-de/library/office/ff869865.aspx – 2013-05-22 10:26:19

-1

子例1（）昏暗strFinal作为字符串昏暗strLine中作为字符串

打开“D：\ textfile.txt”输入为＃1 W往往微不足道EOF（1）= FALSE 线路输入＃1，strLine中如果len（strLine中）> 24然后 strFinal = strFinal + ModifyColumn（strLine中）否则 strFinal = strFinal + strLine中+ vbCrLf 结束如果 WEND strFinal = strFinal 关闭＃1

打开 “d：\ TextFile.txt的” 以便输出为＃1 印刷＃1，strFinal 关闭＃1 结束子

功能ModifyColumn（BYVAL strInput作为字符串）作为字符串昏暗arrString（）作为字符串昏暗strOutput作为字符串 '分裂列 arrString =分段（strInput，vbTab） ' 连接第一2列，因为它们是 strOutput = arrString（0）+ vbTab + arrString（1） + vbTab + arrString（2） 'add 100 $ to column3 requirevalue = Left（arrString（3），InStr（1，arrString（3），“|”） - 1） last3Digit = Right（requirevalue，3）如果Left（requiresvalue，3）=“max”Then Newvalue = vbTab +“OTPxxxxxx”& last3Digit &“|” &右（arrString（3），LEN（arrString（3）） - InStr函数（1，arrString（3）， “|”））+ vbCrLf 否则 NEWVALUE = vbTab + arrString（3）+ vbCrLf 结束如果 strOutput = strOutput & Newvalue 'strOutput = strOutput + Strings。TRIM（STR（CDbl（左（arrString（3），莱恩（arrString（2）） - 1））+ 100））+ “$” + vbCrLf ModifyColumn = strOutput 端功能

来源

2014-11-10 21:13:08 vijaykumar1981

Oulook脚本 - 如何找到最喜欢的文件夹的根文件夹

回答

相关问题