使用'firedac'连接到访问数据库时,模块'bds.exe'中的访问冲突

问题描述 投票:0回答:1

我已经进行了广泛的研究,以寻求解决方案。我知道此错误不在我的代码中。我只能使用TFDconnection组件尝试连接到新的Access数据库来创建一个新项目,但我仍然会收到和访问冲突错误。我已经重新安装了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;

此行之后的异常指向行显示->“对不起,我不确定如何正确发布错误行”

delphi access-violation firedac
1个回答
0
投票

我找到了解决方案。问题出在MSAccess驱动程序,在此处可官方下载-> link重新安装后,我可以再次连接,而不会出现错误。

© www.soinside.com 2019 - 2024. All rights reserved.