是否有代码可以让我读取机器上安装的办公室版本，以及来自ms访问的dll的位置？
所以我最近确信后期绑定是我的应用程序执行自动化的方式。但是，自动化是这个应用程序的主要功能，我需要从一些特定于版本的代码中剥离不同的例程（主要用于ppt演示）。
所以我并没有真正试图通过参考检查来解决我的问题。 IsBroken方法不再是因为这无济于事。但我仍然想知道安装了什么版本的office，安装了每个办公应用程序的版本（Excel 11.0，Outlook 11.0等），以及dll的文件路径。
所以我想知道我是否可以通过阅读注册表获取此信息？
答案 0 :(得分：4)
如果您的后期绑定肯定只需要与版本无关*.Application progid？
Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
Debug.Print "ver " & oApp.Version, "build " & oApp.Build
oApp.Quit
答案 1 :(得分：0)
SysCmd 方法可用于确定有关Microsoft Access的系统信息
SysCmd(acSysCmdAccessVer) -将返回访问版本
SysCmd(acSysCmdAccessDir) -将文件路径返回到dlls