VBA从注册表中读取

Question

有没有代码，让我读从MS Access的动态链接库的安装在计算机上的办公室的版本和位置？

所以我最近一直坚信，后期绑定是去与自动化我的应用程序执行的方式。然而，自动化是这个程序的主要功能，我需要从一些特定版本的代码的分拆不同的例程（主要用于PPT演示）。

所以，我不是真的想来解答我的问题，参照检查与IsBroken方法了，因为那也不会帮助。但我还是想知道的办公室verison安装的是什么，是什么版本的每一个安装在办公应用程序的（Excel的11.0，展望11.0等），并将该文件路径的dll文件。

所以我想，如果我可以通过读取注册表中得到这些信息？

Answer 1

如果您的后期绑定肯定所有你需要的是版本无关*.Application进程id？

Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
Debug.Print "ver " & oApp.Version, "build " & oApp.Build
oApp.Quit

Answer 2

SysCmd方法将可用于确定有关Microsoft Access系统信息

SysCmd(acSysCmdAccessVer) - 将返回Access版本 SysCmd(acSysCmdAccessDir) - 将返回文件路径的dll