vb怎样访问exchange公用文件夹内容

[qingdaoman]

VB怎样用CDO访问exchange中公用文件夹中的信息，objSession.GetFolder(strFolderID) 中的strFolderID是什么?谁有这这方面简单应用的代码？

[christina77]

CDO与ADO相同也是依靠URL和EXOLEDB供应程序同WEB存储系统中的资源相关联.
你可以使用以下URL访问文件夹:
File://./backofficestorage/domain.com(你自己SERVER的域)/PUBLIC FOLDERS/xxxx(你本身已经建立的FOLDER)
这个就你说的strFolderID.
你安装完了EXCHANGE SERVER 2000,会出现M盘,你只能查找此盘上已存在的FOLDERS.

[fervlyu]

用xmlhttp最方便！

[storm97]

http://msdn.microsoft.com/exchange
夏在exchange sdk，里面有简单的代码！

[x_space]

Sub OpenAResource_CDO()
' Return info about a folder
Dim urlFolder As String
Dim fd As ADODB.Field
urlFolder = 文件夹的路径。例如："file://./backofficestorage/testweb.com/water_crop/
With New CDO.Folder
.DataSource.Open urlFolder
For Each fd In .Fields
If Not IsArray(fd.Value) Then
Debug.Print fd.Name, fd.Value
Else
' If the property is multi-valued,
Debug.Print fd.Name, "[MULTIVALUED]"
End If
Next
End With
Set fd = Nothing
End Sub