脚本修改展望（2003）接触

我想清理我的Outlook 2003联系人，这已成为各种格式的比较难看得一塌糊涂，等脚本修改展望（2003）接触

基本上，我有一堆的接触，在其形式如下：

0xxxxxxxxx [十位数字，从0开始] 0xxxxxxxx [九位数字，从0开始] 0xxxxxxxx（xxxxx）[同上九位数字，最后五位在括号内重复] + xxxxxxx [带有国际拨号码的“完整”号码等]

我希望所有数字都与最后一种格式相匹配。该算法非常简单：对于前两种类型，删除0并添加+ YYY，其中YYY是我的国家/地区代码。第三，同上，但放在括号内的一切。

我的问题是，我不知道如何去做这件事。我在我的生活中用Perl编写了一百万个脚本，但我宁愿不将所有内容都导出到文本，处理它，然后重新导入;我希望有一个可轻松重新运行的一键式解决方案（例如，当我从我公司的目录中导入一个新的联系人时，该联系人将出现在上面的一个表单中）。我怀疑VBScript是要走的路;我已经在网上看到了一些参考资料，可以将联系人作为对象访问，但我不确定要开始的最佳方式是什么。

任何推荐资源？

这是https://superuser.com/questions/15913/script-to-modify-outlook-2003-contacts的副本;我不确定哪个网站是更好的位置

来源

2009-07-30 Mikeage

我会说VBA，而不是VBScript。

Sub GetContactsTel() 

    Set oFolder = GetNamespace("MAPI").GetDefaultFolder(olFolderContacts) 
    ' Loop through all of the items in the folder. 
    For i = 1 To oFolder.Items.Count 
     Debug.Print oFolder.Items(i).BusinessTelephoneNumber 
    Next 

End Sub

来源

2009-07-31 12:30:06 Fionnuala

脚本修改展望（2003）接触

回答

相关问题