VBScript 读取 MDB - 它不是 ADP 文件

Question

我对 VBS 很陌生，正在尝试从 MDB 文件调用 vba 宏。我的朋友Google多次展示了这段代码，Microsoft's office site包括在内。

但是，它抛出错误提示“Microsoft Access 无法打开数据库，因为它丢失，或被其他用户以独占方式打开，或者它不是 ADP 文件。 " 我确信 db 文件在那里并且没有打开。谁能告诉我为什么代码不起作用？如何将 MDB 文件转换为 ADP？

set appAccess = createobject("Access.application")
appAccess.OpenCurrentDatabase("SAME.MDB")

Answer 1

我无法解决这个错误。但是我找到了使用 powershell 而不是 VBS

的解决方法

    $app = New-Object -comobject Access.Application
    $app.OpenCurrentDatabase("SAME.MDB")
    $app.run("mainrun")
    $app.CloseCurrentDatabase()

VBScript reads MDB - it is not an ADP file