如何获取存储在iManage上特定文件夹中的文件的名称？

Question

在VBA中，有没有办法通过引用FolderID来列出存储在Worksite/iManage上的特定文件夹中的文件？

我想要实现的是获取所有文件并将它们列在电子表格的A列中，就像您可以从普通磁盘目录中获取文件夹的内容一样。

在imanage中，文件名为iManDocument.Description。

下面是我到目前为止所想出来的。我不知道如何继续下去:(

Dim dmsRoot As IManDMS
Dim dmsSession As IManSession
Dim dmsDatabase As IManDatabase
Dim iFile As IManDocument
Dim iFdr as ImanFolder
DimFname as String

Const ServerName As String = "DMSname"
Const DatabaseName As String = "DatabaseName"
Const ifID as long = "123456"

Set dmsRoot = New ManDMS
Set dmsSession = dmsRoot.Sessions.Add(ServerName)
dmsSession.TrustedLogin

Set dmsDatabase = dmsSession.Databases.ItemByName(DatabaseName)

Set iFlr = dmsDatabase.GetFolder(ifID)

我通常会做的是创建一个循环

For each iFile in iFlr

  Fname = IFile.Description

并将名称逐个放入单元格中，但ImanFolder似乎没有这样的属性。

如果有人能帮上忙，我们将不胜感激。

Answer 1

IManage文件夹具有Contents属性，其中包含存储在其中的项目。您可以枚举内容，在可能的情况下强制转换为IManDocument，并从中获取属性。类似于下面这样的东西应该可以工作：

Dim folderItem As IManContent
Dim currentImanDoc As IManDocument

.... Get your folder  

For Each folderItem In currentIManFolder.Contents
    FName = folderItem .Description
Next