时间戳

首页 > 解决方案 > 使用“firedac”连接到访问数据库时模块“bds.exe”中的访问冲突

delphi - 使用“firedac”连接到访问数据库时模块“bds.exe”中的访问冲突

问题描述

我进行了广泛的研究以寻找解决方案。我知道这个错误不在我的代码中。我可以创建一个只有 TFDconnection 组件尝试连接到新访问数据库的新项目，但我仍然收到访问冲突错误。我已重新安装 Rad Studio 10.3，但问题仍然存在。任何帮助解决此问题将不胜感激。

function TODBCConnection.DriverConnect(const AConnString: String;
  ADriverCompletion: SQLUSmallint; AParentWnd: SQLHWnd): String;
var
  iOutConnStrLen: SQLSmallint;
{$IFDEF FireDAC_MONITOR}
  s: String;
  i1, i2: Integer;
{$ENDIF}
begin
{$IFDEF FireDAC_MONITOR}
  if Tracing then begin
    s := AConnString;
    i1 := Pos('PWD=', UpperCase(s));
    if i1 <> 0 then begin
      i2 := Pos(';', s, i1);
      if i2 = 0 then
        i2 := Length(s) + 1;
      Inc(i1, 4);
      while i1 < i2 do begin
        s[i1] := '*';
        Inc(i1);
      end;
    end;
    Trace(ekVendor, esProgress, 'SQLDriverConnect', ['szConnStr', s]);
  end;
{$ENDIF}
  SetLength(Result, C_RETURNED_STRING_MAXLEN);
  FillChar(Result[1], C_RETURNED_STRING_MAXLEN * SizeOf(Char), 0);
  iOutConnStrLen := 0;

-> Check(Lib.SQLDriverConnect(FHandle, AParentWnd, PSQLChar(AConnString), 
SQL_NTS,
    PSQLChar(Result), C_RETURNED_STRING_MAXLEN, iOutConnStrLen, 
ADriverCompletion));
  FConnected := True;
  AfterConnect;
  ODBCSetLength(Result, iOutConnStrLen);
end;

异常指向 line show after ->“我很抱歉，我不确定如何正确发布错误行”

标签： delphiaccess-violationfiredac

解决方案

我找到了解决方案。问题出在此处官方下载的 MSAccess 驱动程序 ->链接重新安装后，我能够再次连接而没有错误。

推荐阅读