在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!

人工智能实验室
相关文章相关文章
  • 第一批国家重点研发计划公布,旷视科技开启“五年行动”

    第一批国家重点研发计划公布,旷视科技开启“五年行动”

  • 长虹新款智能语音空调,告诉你空调也能玩Siri

    长虹新款智能语音空调,告诉你空调也能玩Siri

  • 品友互动为Digital Travel APAC2018 唯一受邀中国AI企业

    品友互动为Digital Travel APAC2018 唯一受邀中国AI企业

  • 让AI触手可及  Qualcomm携手创通联达推出全新终端侧AI开发套件

    让AI触手可及 Qualcomm携手创通联达推出全新终端侧AI开发套件

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

据外媒报道,STEER打造了首款完全自动驾驶停车技术,旨在使常规车辆转变为无人驾驶车辆。STEER的首款技术应用是4级自动驾驶及网络安全停车...

近日,美国软性机器抓手制造商 Soft Robotics 宣布,获得 2000 万美元的融资,本轮投资者包括 Scale Venture Partners,Calibrate Ventures...

据外媒报道,加州车管局发布了《2017自动驾驶脱离报告(California Autonomous Vehicle Disengagement Reports)》,其中谈及了脱离的具体...

用人机语音交互,来解决智能家居适老的问题;通过家庭门禁与安防套件、空气净化套件、可燃气体与有害气体监控套件等相互联动,在不同生活情...