Access培训-Access开发平台-Access行业开发
Access交流网(免费Access交流）
QQ：18449932
网 址：www.access-cn.com
如何判断Access数据库是运行在正常完整版本(Full Access)还是运行时版本(Access Runtime)
作者：Tmtony -- Offfice中国有2种方法1. 使用Syscmd来判断
If SysCmd(acSysCmdRuntime) = False Then
'程序是运行在完整的 MS Access 版本下
Else
'程序是运行在 运行时 MS Access Runtime版本下
End If
2. 使用创建数据库来判断 由于runtime运行时版本是不能创建新数据库的，根据这个特点来判断 还可判断 打开窗体到隐藏的设计状态（不过MDE也会这样）
Dim accApp as Object
On Error Resume Next '出错继续执行，不弹出错误信息，只获取有否错误
Set accApp= CreateObject("Access.Application")
If Err.number<>0 then
MsgBox "运行在Access Rumtime 运行时", vbOKonly
MsgBox "运行在完整Access版本下", vbOKonly
End if
