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似乎没有这样的属性。
一些帮助,我真的很感激。
答案 0 :(得分:0)
IManage文件夹有一个Contents属性,其中包含存储在其中的项目。您可以枚举内容,尽可能地转换为IManDocument,并从中获取属性。类似于以下内容应该有效:
Dim folderItem As IManContent
Dim currentImanDoc As IManDocument
.... Get your folder
For Each folderItem In currentIManFolder.Contents
FName = folderItem .Description
Next