0

我想知道有没有办法用 VBscript 处理整个过程?我有一个 M 文件,在 VBA 中我可以选择参考

在此处输入图像描述

之后我可以使用 M-Files API 命令来执行代码。

Dim oVaultConnections As MFilesAPI.VaultConnections
Dim oDocumentCollectionOVAP As New MFilesAPI.ObjectVersionAndProperties
Dim oOldDocumentOVAP As New MFilesAPI.ObjectVersionAndProperties
Dim oMFClientApp As New MFilesAPI.MFilesClientApplication

On Error Resume Next

    Set oVault = oMFClientApp.BindToVault(szVaultName, 0, True, True)

If Err.Number <> 0 Then

    ' Error
    Err.Number = 0

    Set oVault = oMFClientApp.BindToVault(oMFClientApp.GetVaultConnectionsWithGUID(szVaultGUID).Item(1).Name, 0, True, True)

   If Err.Number <> 0 Then
        MsgBox "Can't connect to M-Files"
        End
    End If

End If

On Error GoTo 0

On Error GoTo ErrorHandler1

VBScript 呢?如果我想创建 VBS 文件并使用 VBScript 执行所有操作而不需要 VBA(例如 Excel 文件)怎么办?

在 VBScript 中,我必须通过以下方式获取所有对象:

Set MFiles = CreateObject("Scripting.MFiles")

是否有可能通过dll的位置来获取它?如果我的版本将从 19.9.8227.13 更改怎么办?路径会不一样吗?

4

0 回答 0