如何检查MS Access Fullversion或Viewer

时间:2013-03-16 10:02:45

标签: vba ms-access ms-access-2007 access-vba

我想检查我的数据库应用程序是在全反式MS Access中运行还是仅在查看器/有限的MS Access中运行。

问题在于,在限制版本中,用户可以关闭最后一个表单,然后在不重新启动整个应用程序的情况下无法重新打开任何表单。

Private Sub Form_Unload(Cancel As Integer)
    If LimitedVersion Then
        Cancel = True
    End If
End Sub

所以问题是如何确定LimitedVersion?

1 个答案:

答案 0 :(得分:3)

您可以使用:

SysCmd(acSysCmdRuntime) 

它将为运行时版本返回True。

但是,我永远不会允许在应用程序中关闭最后一个菜单。如果需要访问设计,具有完整版本的人可以以不同的方式打开应用程序。

要模拟运行时环境,可以使用/ runtime开关:

对于MS Access 2010,它看起来像这样,请注意换行符用于显示目的。

"C:\Program Files\Microsoft Office\Office14\MSACCESS.EXE"
"z:\docs\demo.accdb" /runtime