Office中国论坛/Access中国论坛

标题: 判断程序是MDB还是ADP [打印本页]

作者: tmtony 时间: 2004-6-6 19:09
标题: 判断程序是MDB还是ADP
判断程序是MDB还是ADP

Dim intProjType As Integer

intProjType = Application.CurrentProject.ProjectType

Select Case intProjType

Case 0 ' acNull

      MsgBox "工程类型为空"

Case 1 ' acADP

      MsgBox "工程类型为ADP"

Case 2 ' acMDB

      MsgBox "工程类型MDB"

Case Else

MsgBox "不能决定工程类型"

End Select

<SCRIPT language=JScript src="mk:@msitstore:msohlp11.chm::/html/ofvbanl.js" type=text/javascript>
<script>

复制代码

作者: zhengjialon 时间: 2004-6-8 00:58
很实用的代码 [em01]

作者: 竹笛 时间: 2004-6-8 02:36
在什么情况下可以应用呢?意即可用来做什么啊?

作者: xinbao 时间: 2004-6-8 04:51
可能有函数只有ADP或只有MDB才能用，所以要判断。估计应如此。

作者: myhome810 时间: 2006-4-27 18:21
我想请教高手，我做的access数据库怎么不能生成MDE的，而且运行时经常出现“内存溢出”的提示，搞到我头都大了，希望能帮我解决一下，先谢谢了![em06][em06][em06]

作者: 绿色爱好者 时间: 2006-7-28 06:12
谢谢

作者: china007 时间: 2006-7-28 23:20
感谢提供，谢谢

作者: andymark 时间: 2006-7-29 07:59
学习

作者: chaojianan 时间: 2009-10-31 11:04
谢谢分享。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)