回 帖 发 新 帖 刷新版面

主题:本人第一次来此论坛,求教些简单问题,让各位高手见笑了

我是个刚毕业的,在一家小公司做一些小型软件,主要是维护下ORACLE系统(这个我还在学习中)和在OUTLOOK里面用VBScript做Form供公司使用,我是学C类语言的,一直没学过VB方面的东西,对WIN API编程也了解得很少,我遇到了一个问题,就是在VBSCRIPT里面用代码实现把地址簿中的信息读出来,有人告诉过我,那些信息是保存在MAPI文件夹中,你朝那方面努力肯定可以做到,但是我不知道怎么具体去实现,我没学过这方面的东西,也没看到这个方面的例子,请各位高手指教,不胜感激!

回复列表 (共2个回复)

沙发

VBSCRIPT 不太懂,不过学过点API
以后可以多多交流啊!
没人看,我帮你顶下!

板凳


今天我从以前同事(已经跳槽了)做的一段代码受到点启发,实现了一点点功能代码如下:    
   Set myOlApp = CreateObject("Outlook.Application")
   Set myNameSpace = myOlApp.GetNameSpace("MAPI")
   Set myAddressList = myNameSpace.AddressLists("Global Address List")
   Set myAddressEntry = myAddressList.AddressEntries("~DG IT")
    '~DG IT 是公司一个邮件组的名字
    For Each memberEntry In myAddressEntry.Members
      MsgBox memberEntry
    Next 
我很不习惯VB的语法,但是在这个公司,都用VB我也没办法,只好学. 
这个代码从MAPI文件中读出了~DG IT 里面所有人的邮件地址(要使用的话,放到数组就可以了),但是我还想要读出这个组里Notes里面的信息,我想了几天还是做不到.本人实在愚笨,见笑了.

我来回复

您尚未登录,请登录后再回复。点此登录或注册