访问VBA - 相对文件引用(Access VBA - relative file referen

2019-07-05 11:01发布

在已经建立了几个MDA库文件,这我然后从我的主要访问应用程序中引用(即使用工具 - >在IDE中引用)。

有这些引用可以进行相对的而不是绝对的方式。 我问的原因是,它会很容易地建立在用户的计算机上,如果所有三个文件(主要应用和两个MDA文件)可以简单地放置在任何目录和工作,而无需更改引用.. 。

谢谢

Answer 1:

为什么不直接把三个MDES在目标系统上的同一个文件夹? 访问应该找到MDE引用就好了。

或者您使用的是外接逻辑与USysRegInfo表? 你并不真正需要做的是用自己的加载项。 只是开发商类插件,如里克·费希尔的查找和替换。

如果这不是为你工作,然后告诉我们什么错误信息或症状。



Answer 2:

要获取访问应用程序的文件路径

CurrentProject.Path & "\"

然后,只需添加其他文件在同一目录和名称得到他们。 即

Dim filepath As String
filepath = CurrentProject.Path & "\name_of_file.mda"


Answer 3:

您可以通过VBA本身添加VBA引用。

Dim sFilename As String
sFilename = CurrentProject.Path & "\" & whatever.mda

Application.References.AddFromFile sFilename

只要把在您的AutoExec和基准应当是可用的一切。 当然,你必须检查是否参考添加它之前已经存在,否则,你得到一个错误。 但是,这只是一个通过Application.References循环的问题。



文章来源: Access VBA - relative file references