判断当前access是完整的Office(access) 还是 Access运行时(Access Runtime)

2018-11-23 16:07:00
tmtony
原创
197

用Access开发的应用程序需要系统安装有Access才能正常打开。在不安装整个Access的情况下,是否有办法运行Access文件呢?

答案是肯定的。只需要安装AccessRuntime就可以。

但是有时在完整版office中运行没问题,在runtime中却可能会有问题。

那么如何区分打开的环境是完整版的Access还是AccessRuntime



可以用SysCmd (acSysCmdRuntime)判断,使用 SysCmd 方法可以在状态栏上显示一个进度表或可选的指定文本
如果返回 True (–1)。运行 Microsoft Access 的版本为运行时版本



也可用以下代码判断是否 AccessRuntime

'    Purpose: Decide whether  Full Access or Runtime only is installed:
'    Author: Kenneth Spencer
'    Modified by: Daniel Pineault
    On Error Resume Next
    Set oAccess = CreateObject("Access.Application")
    If Err.Number <> 0 Then
        MsgBox "Starting under Runtime", vbOKOnly
    End If
    wscript.Quit
    On Error GoTo 0
'    Rest of code for Full Access startup
    MsgBox "Starting under Full Version", vbOKOnly 




完整Access版本测试 Runtime 效果可以这样实现

在桌面 右键 创建快捷方式,输入 MSAccess.exe的完整路径及文件名,然后在最后加上  /runtime 参数开关;
例如:
"C:\Program Files\Microsoft Office\MSACCESS.EXE" "C:\你的数据库名-office中国.mdb" /runtime
你的数据库名-office中国.mdb 改成你自己的数据库名即可

    分享