1

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 似乎没有这样的属性。

一些帮助，这将非常感激。

4

1 回答 1

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
于 2018-01-16T12:22:23.013 回答