0

我正在尝试查找用于将 Excel 文件保存到 iManage 的示例 VBA。我有一些代码可以让我下载文档，但我不知道是否有类似的东西可以保存到工作区。

Excel 文件将有一个工作区引用，例如 123456/0001，因此宏代码将查看此文件，然后使用该客户/事项编号保存到工作区。

我与 iManage 交互的代码在这里：

Private Sub DownloadDoc()

Dim dmsRoot As IManDMS
Dim dmsSession As IManSession
Dim dmsDatabase As IManDatabase
Dim doc As IManDocument

Dim tempDocName As String

Const ServerName As String = "MYSERVER"
Const DatabaseName As String = "MYDATABASE"

Const DocNumToFind = 7487741
Const DocVerToFind = 1

tempDocName = "C:\temp\mydoc.docx"

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

    Set dmsDatabase = dmsSession.Databases.ItemByName(DatabaseName)
    Set doc = dmsDatabase.GetDocument(DocNumToFind, DocVerToFind)

   doc.GetCopy tempDocName, imGetCopyOptions.imNativeFormat
   End Sub

我意识到我根本没有太多的代码，所以即使只有几个指针/方法等，我可以去研究更多的东西，我将不胜感激。

4

0 回答 0