在Access获取程序所在的目录及全名

  次阅读 作者:智能小宝 来源:互联网 2016-02-16 10:23 我要评论(0)

在Access编程中,经常会需要获取程序所在的目录及全名,下列的各种方法可实现这个功能。

不过,需注意 CurrentProject及CodeProject不适合Access97及以前的版本。

另外,需注意 CurrentProject及CodeProject的区别

一般情况下,如果你的MDB或ADP只使用一个文件,两者指同一个对象。但如果你的MDB引用了另一个MDE文件。且这段代码是在MDE里执行的话,则currentproject指你的第一个MDB,codeproject 指的是你引用的MDE文件。这种特性用在多模块,通用模块开方中非常好,我将其用于企业管理系统的开发当中,这样,可使用多个MDE文件来分开实现不同的功能,而各个MDE又可组合成一个强大的系统(如ERP)。

有关详细的MDE相互调用及如果跨MDE、平级MDE、上下级MDE相互调用窗体及报表的方法,可发邮件给我:tmtony@21cn.com做进一步解释

? CurrentProject.FullNameD:frontaccesstmtonyAboutPath.mdb? CurrentProject.NametmtonyAboutPath.mdb?CurrentProject.PathD:frontaccess?Currentdb.NameD:frontaccesstmtonyAboutPath.mdb?Codeproject.NametmtonyAboutPath.mdb? CodeProject.FullNameD:frontaccesstmtonyAboutPath.mdb? CodeProject.pathD:frontaccess

读取各个对象的名称

Dim obj As AccessObjectFor Each obj In CurrentProject.AllDataAccessPagesDebug.Print obj.NameNext objFor Each obj In CurrentProject.AllFormsDebug.Print obj.NameNext objFor Each obj In CurrentProject.AllMacrosDebug.Print obj.NameNext objFor Each obj In CurrentProject.AllModules Debug.Print obj.NameNext objFor Each obj In CurrentProject.AllReportsDebug.Print obj.NameNext obj

本站文章信息来源于网络以及网友投稿,本站只负责对文章进行整理、排版、编辑,是出于传递更多信息之目的,并不意味着赞同其观点或证实其内容的真实性。如果您有什么意见或建议,请联系QQ28-1688-302!

人工智能实验室
相关文章相关文章
  • 英国研发“杀生”机器人 通过生命体获取能量

    英国研发“杀生”机器人 通过生命体获取能量

  • 无人驾驶汽车如何改变城市生活?听听他们怎么说

    无人驾驶汽车如何改变城市生活?听听他们怎么说

  • 未来两年人工智能要怎么走?看这篇就够了

    未来两年人工智能要怎么走?看这篇就够了

  • 韩春雨称已能重复实验结果 近期将有消息公布

    韩春雨称已能重复实验结果 近期将有消息公布

网友点评网友点评
阅读推荐阅读推荐

据国外媒体报道,在过去两年内,聊天机器人(chatbot)、人工智能以及机器学习的研发和采用取得了巨大进展。许多初创公司正利用人工智能和...

霍金 视觉中国 图 英国著名物理学家霍金(Stephen Hawking)再次就人工智能(AI)发声,他认为:对于人类来说,强大AI的出现可能是最美妙的...

文|郑娟娟 今年,人工智能(AI) 60岁了。在AI60岁的时候,笔者想要介绍一下AI100,一个刚刚2岁的研究项目,但它的预设寿命是100年,甚至更长...

AlphaGo与李世石的人机大战,为大众迅速普及了人工智能的概念。 但对谷歌而言,除了下围棋,现在的人工智能进展到哪一步了?未来,人工智能...