如何使用VBA确定Oracle客户端版本号？

Question

有谁知道如何使用VBA获取当前使用的Oracle客户端版本号？ （以及信息“32位”或“64位”客户端。）

如果有，请您发贴示例代码吗？

非常感谢。

1）与Oracle的连接没问题

2）通过ADO和MS驱动程序连接

3）连接对象属性在驱动程序，连接和数据库上显示了大量信息。但没有关于oracle客户端的信息：

• Asynchable Abort：FALSE
• Asynchable Commit：FALSE
• 通过Ref访问者：TRUE
• 目录位置：2
• 目录期限：Datenbankverknüpfung
• 目录用途：1
• 列定义：1
• NULL连接行为：2
• 连接状态：s 1
• 数据源名称：BASE
• 只读数据源：FALSE
• DBMS名称：Oracle
• DBMS版本：09.02.0000 Oracle9i企业版9.2.0.8.0版 - 64位生产
• 数据源对象线程模型：1
• GROUP BY支持：4
• 异构表支持：1
• 标识符区分大小写：1
• 最大索引大小：0
• 最大开放章节：0
• 最大行数：0
• 最大行大小包括BLOB：TRUE
• SELECT中的最大表：0
• 多个参数集：TRUE
• 多项结果：0
• 多个存储对象：FALSE
• 多表更新：FALSE
• NULL整理顺序：2
• OLE对象支持：1
• 按选择列表中的列排序：FALSE
• 输出参数可用性：2
• 持久性ID类型：4
• 准备中止行为：2
• 准备提交行为：2
• 程序术语：PL / SQL - Gespeicherte Prozedur
• 提供商友好名称：Microsoft OLE DB Provider for Oracle
• 提供商名称：MSDAORA.DLL
• OLE DB版本：2
• 提供商版本：02.81.1132.0
• 引用标识符敏感度：4
• 命令上的行集转换：TRUE
• 架构术语：Besitzer
• 架构用法：15
• SQL支持：267
• 结构化存储：1
• 子查询支持：31
• 交易DDL：2
• 隔离级别：1052672
• 隔离保留：0
• 表术语：Tabelle
• 用户名：REPORT
• 表统计支持：3
• 打开行集支持：8
• 密码：b_rep
• 用户ID：report
• 数据来源：BASE
• 窗口句柄：
• 区域设置标识符：1031
• OLE DB服务：-7
• 提示：4
• 扩展属性：
• 自动提交隔离级别：4096

Answer 1

我不知道是否可以在VBA中使用，但在VB.NET中你可以这样做：

Dim con As System.Data.OleDb.OleDbConnection
Dim architecture As String

architecture = System.Reflection.AssemblyName.GetAssemblyName(con.GetType.Assembly.Location).ProcessorArchitecture.ToString

Console.WriteLine("Architecture: " & architecture)
Console.WriteLine("Assembly: " & con.GetType.Assembly.FullName)