如何导出全公司成员的email地址

maweicpu

windowns 2003+exchange2003的环境，有个叫all staff的组，里面包含了全公司员工的帐号，我想导出全部帐号的email地址，该如何做？我试了一下，最多好像导出帐号，不能导出email地址，请各位大哥知道的帮助一下小弟

maweicpu

虽然没有解决我的问题，呵呵，

maweicpu

真的非常感谢版主

atong999888

给你一个vbs脚本

const ForReading = 1, ForWriting = 2, ForAppending = 8
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:\emaillist.txt", ForWriting,true,TristateFalse)
Set objGroup = GetObject("LDAP://cn=yourgroupname,ou=users,dc=yourdomain,dc=com")
i=0
For each objMember in objGroup.Members
    i=i+1
    StrRecord=i & ":::" & objMember.displayname & ":::" & objMember.mail
    f.Writeline StrRecord
Next
f.close

其中的Set objGroup = GetObject("LDAP://cn=yourgroupname,ou=users,dc=yourdomain,dc=com")
要看你的实际情况而定.

atong999888

无法按组导, 只能按ou导.
邮件列表导出
csvde -f emailist.csv -d "ou=users,dc=yourdomain,dc=com"
导出后看emaillist.csv即可.