具有Access Runtime 2007问题的CreateObject(“ Access.Application”)

时间:2019-05-31 12:36:35

标签: vba ms-access access-vba runtime createobject

我正在使用在下面使用VBA的SCADA系统。我需要运行存储在Access数据库(.mdb格式)中的函数。 在装有 Office 2007 的计算机上,我运行以下脚本:

Public Function RunAccessMacro(strDBPath As String, strMacroName As String)
On Error GoTo ErrH
Dim objAccessDB As Access.Application
    Set objAccessDB = CreateObject("Access.Application")
    objAccessDB.OpenCurrentDatabase strDBPath, False
    objAccessDB.Run strMacroName
    objAccessDB.CloseCurrentDatabase
    Exit Function
ErrH:
    objAccessDB.CloseCurrentDatabase
End Function

并且没有错误。在具有 Access Runtime 2007 的另一台计算机上,我收到错误消息

  

运行时错误'429':“ ActiveX组件无法创建对象”

在线

Set objAccessDB = CreateObject("Access.Application")

但是,有对Access.Application的引用(来自MSACC.OLB)。 所以我的问题是:是否可以在仅安装Access运行时的情况下从Access数据库运行功能?

0 个答案:

没有答案