3

我有一个在 Windows 7 上运行的 Delphi 2006 应用程序,它使用 Oracle 11 客户端安装通过 dbExpress 连接到 Oracle 数据库。第一次连接后,我可以查询数据,一切都按预期工作。但是,当我断开连接然后重新连接时,出现以下错误:

Exception EAccessViolation in module orageneric11.dll at 00450EB5. 
Access violation at address 048A0EB5 in module 'orageneric11.dll'.
Read of address 00000038

相同的应用程序在使用 Oracle 10 客户端安装的 Windows XP 上运行良好(不幸的是,我没有使用 XP + Oracle 11 或 Windows 7 + Oracle 10 的测试设置)。

我已将问题减少到以下几点:

program OracleReconnectTest; 

{$APPTYPE CONSOLE} 

uses
  SysUtils,
  SqlExpr; 

var
  connection: TSQLConnection;

begin
  connection := TSQLConnection.Create( nil );
  connection.DriverName := 'Oracle';
  connection.LibraryName := 'dbxora30.dll';
  connection.VendorLib := 'oci.dll';
  connection.GetDriverFunc := 'getSQLDriverORACLE';
  connection.LoginPrompt := False;
  connection.Params.Text :=
    'DATABASE=TheDatabase' + #$D#$A +
    'USER_NAME=TheUser' + #$D#$A +
    'PASSWORD=ThePassword' + #$D#$A +
    'DECIMAL SEPARATOR=,'; 

  connection.Connected := True; 

  Writeln( 'Connected once, press ENTER to disconnect and reconnect' );
  Readln; 

  connection.Connected := False;
  connection.Connected := True; // <- access violation on Windows 7 + Oracle 11

  Writeln( 'Reconnected, press ENTER to exit' );
  Readln;
end.

我想这排除了我的应用程序代码的问题。我已经逐步浏览了 Delphi 附带的 dbExpress 代码,但没有遇到任何看起来错误或可以解释这一点的东西。

所以我找不到任何表明这是 dbExpress 或 Oracle 驱动程序中的错误的东西。因此,我不知道是否向 Embarcadero 和/或 Oracle 提交错误。

的版本orageneric11.dll11.2.0.1,并且dbxora30.dll是版本10.0.2151.25345

因为在并行安装多个客户端版本时出现问题,所以问题机器只有11个客户端。使用 Process Explorer,我已验证仅使用来自 11 个客户端的 DLL。

有没有其他人遇到过这个问题并且可以指出我正确的方向?

4

1 回答 1

1

抱歉,我没有可以解决此问题的“又好又甜”的解决方案,但您可以考虑以下一些选项:

a) 在客户端为指定数据库设置 ODBC DSN 后,更改使用的驱动程序并尝试通过 ODBC 访问数据库。可以在此处找到开源驱动程序:https ://sourceforge.net/projects/open-dbexpress/

b) 购买新版本的 Delphi。我知道,这可能是一种真正的痛苦。这会花费金钱和时间(如果涉及到第 3 方组件则更多),但有时使用已有十多年历史的产品并不是最好的主意。此后,德尔福背后的公司和知识产权已多次转型/出售给不同的公司。绝对没有机会获得对这个遗留产品的官方支持。

c)(真的很丑,但可能有机会):建立一个池机制来防止关闭连接。听起来真的很荒谬,不是吗?

于 2016-11-17T15:01:03.813 回答